Member Avatar for bugmenot

hi guys,
i am using vb6 as front end and oracle as back end for my project.
i am using ADO to connect to oracle database.
can u please help me with the code.
my code is

Dim con As New ADODB.Connection
Dim str As String

Private Sub Command1_Click()
str = "Provider=MSDAORA.1;Password=tiger;User ID=scott;Data Source=oracle40;Persist Security Info=True;"
With con
.Open str
End With
con.BeginTrans
con.Execute "insert into PBS_NAMEADDRESS values('" + o_code.Text + "','" + o_name.Text + "','" + o_address.Text + "','" + o_city.Text + "','" + o_state.Text + "','" + o_country.Text + "')"
con.CommitTrans
Command1.Enabled = False
End Sub

when i run the program and try to enter the values the values entered previously r disappearing.
please help me . its urgent.
also tell me if there are any errors or is there any way to do it.
thank you.

  • 2 Contributors
  • 2 Replies
  • 191 Views
  • 11 Hours Discussion Span
  • Latest Post Latest Post by bugmenot

Recommended Answers

All 2 Replies

Member Avatar for debasisdas

The problem you are facing is not because of this code . You might have specified something else in other parts of the code.

Member Avatar for bugmenot

no this is the only code .... i hav not specified anything else...
i have just given the data sources and data field properties to the texboxex in the form....
will i be able to run d program without changing the properties of the textboxes?

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.