高分求vb连接sql anywhere 直接连接方法

Question

我想用vb直接连接sybase sql anywhere 但一直没有找到方法，请高手指点。不要跟我说用ODBC。

Answer 1

Option ExplicitDim cn As New ADODB.Connection
Private Sub Form_Load()
    '连接 SQL ANYWHERE 数据库
    cn.ConnectionString = "Driver={Sybase SQL Anywhere 5.0};DatabaseFile=D:\ProgramsExample\VbExample\工商局咨询管理系统\管理系统\数据库\Refer.DB;DatabaseName=Refer;UID=dba;PWD=sql;AutoStop=yes;Agent=engine;Start=C:\Program Files\Sybase\SQL Anywhere 5.0\win32\dbeng50.exe"
    cn.Open
End SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    cn.Close
    Set cn = Nothing
End Sub

Answer 2

cn.Open"Driver={Sybase SQL Anywhere 5.0};DatabaseFile=c:\test.DB;DatabaseName=dbtest;UID=dba;PWD=sql;AutoStop=yes;Agent=engine;Start=C:\Program Files\Sybase\SQL Anywhere 5.0\win32\dbeng50.exe"

Answer 3

用ADO，这些东东都可以自动生成的。