visual basic 6.0
-
how do i make the back end database in sqlserver2000 appear in the front end on the visual basic form plz let me know how the connectivity is to be done
Dim Con As New ADODB.Connection Dim Rs As New ADODB.Recordset Dim Com As New ADODB.Command Private Sub Form_Load() with Con .ConnectionString = "Data Provider=SQLOLEDB; Provider=MSDATASHAPE; uid=;pwd=; Initial Catalog=dbname; Server=server-name;" .Open end with With Com .ActiveConnection = Con .CommandType = adCmdText .CommandTimeout = 0 '//never time-out .CommandText = "SELECT * FROM table-name" End With Rs.Open Com Call Read '//sub defined below End Sub private sub Read() Rs.MoveFirst while not Rs.EOF Print Rs!Field-name1 '//print to screen - whatever.. Print Rs!Field-name2 . . Print Rs!Field-namen Rs.MoveNext wend end sub :rose::rose: