https://www.searchenginegenie.com/programming-blog Tue, 11 Dec 2012 08:59:19 +0000 en-US hourly 1 https://wordpress.org/?v=6.5.5 https://www.searchenginegenie.com/programming-blog/odbc-connectivity/ https://www.searchenginegenie.com/programming-blog/odbc-connectivity/#respond Fri, 28 Mar 2008 08:15:00 +0000 http://www.searchenginegenie.com/programming-blog/odbc-connectivity/ [php]
Sub ConnectionExample1()
Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection
‘ Open a Connection using an ODBC DSN named "Pubs".
cnn.Open "Pubs", "MyUserName", "MyPassword"
‘ Find out if the attempt to connect worked.
If cnn.State = adStateOpen Then
MsgBox "Welcome to Pubs!"
Else
MsgBox "Sorry. No Pubs today."
End If
‘ Close the connection.
cnn.Close
End Sub
[/php]

]]> https://www.searchenginegenie.com/programming-blog/odbc-connectivity/feed/ 0