From: | nguyenthi myphuong <myphuong244(at)yahoo(dot)com> |
---|---|
To: | pgadmin-support(at)postgresql(dot)org |
Subject: | Help me. |
Date: | 2008-03-14 02:17:25 |
Message-ID: | 566010.23448.qm@web32607.mail.mud.yahoo.com |
Views: | Raw Message | Whole Thread | Download mbox | Resend email |
Thread: | |
Lists: | pgadmin-support |
I am a new using postgres. I have a project using writen via VB6.0 and using database Postgres.
But when i using ia have error:
1_:I using adodc for insert data into table of postgres.
Table name: tbl_order_printer(loc_id varchar(20),
item_id varchar(50),
In VB6.0 i using code:
Dim rs As New ADODB.Recordset
Set rs = Nothing
rs.CursorLocation = adUseClient
rs.Open "select * from TBL_ORDER_PRINTER where loc_id='" & Mod_Sysvar.V_LocId & "' " _
& " and area_id='" & Trim(Me.SSOleDBCombo_khuvuc.Value) & "' " _
& " and print_id='" & Trim(Me.SSOleDBCombo_print.Value) & "' " _
& " and item_id='" & Trim(Me.txt_Item_Id) & "'", cn, adOpenKeyset, adLockOptimistic, admcdtext
If rs.EOF = True Then
rs.AddNew
rs.Fields("loc_id") = Mod_Sysvar.V_LocId
rs.Fields("area_id") = Me.SSOleDBCombo_khuvuc.Value
rs.Fields("item_id") = Trim(Me.txt_Item_Id)
rs.Fields("print_id") = Me.SSOleDBCombo_print.Value
rs.Update
End If
Table name:tbl_rollback(frm_name varchar(50),
action_descrition varchar(50),
record_no varchar(20),
user_id varchar(20),
computer_name varchar(50),
last_update TIMESTAMPTZ)
In VB6.0:
From | Date | Subject | |
---|---|---|---|
Next Message | nguyenthi myphuong | 2008-03-14 02:26:22 | Can you help me. |
Previous Message | Devrim GÜNDÜZ | 2008-03-13 16:51:08 | Re: Version for CentOS |