В этом коде на Visual
Пример 8
В этом коде на Visual Basic средствами ADO устанавливается соединение с базой данных SQL Server: Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "Select * From Authors", "DSN=pubs;UID=sa;PWD="
Do Until rs.EOF
Print rs!au_lname
rs.MoveNext
Loop
rs.Close
Содержание раздела