EASY WAY TO EDIT RECORDS FROM SQL TABLE USING ADODB
EASY WAY TO EDIT RECORDS FROM SQL TABLE USING ADODB
API Declarations
Public con As ADODB.Connection
Rate EASY WAY TO EDIT RECORDS FROM SQL TABLE USING ADODB
(1(1 Vote))
Private Sub edit_Click(Index As Integer)
Dim rs As ADODB.Recordset
Set rs = con.Execute("select * from salgrade ")
While (rs.EOF = False)
Text1(0).Text = Text1(0).Text & rs.Fields(0) & vbCrLf
Text1(1).Text = Text1(1).Text & rs.Fields(1) & vbCrLf
Text1(2).Text = Text1(2).Text & rs.Fields(2) & vbCrLf
Text1(3).Text = Text1(3).Text & rs.Fields(3) & vbCrLf
rs.MoveNext
Wend
End Sub
Private Sub exit_Click(Index As Integer)
End
End Sub
Private Sub Form_Load()
Set con = New ADODB.Connection
con.Open "driver={microsoft odbc for oracle}", "scott/tiger"
End Sub
EASY WAY TO EDIT RECORDS FROM SQL TABLE USING ADODB Comments
No comments yet — be the first to post one!
Post a Comment