Set typers = New ADODB.Recordset conn.ConnectionString = "dsn=interbank;uid=qq;pwd=qiqi;" conn.Opentypers.ActiveConnection = conn
Set typers = New ADODB.Recordset conn.ConnectionString = "dsn=interbank;uid=qq;pwd=qiqi;" conn.Open typers.ActiveConnection = conn
dim conn as new adodb.connectionconn.connectionstring="driver={sql server};server=servername;uid=your uid;pwd=your password;database=your databasename"conn.open
public M_SQL_Connect as string M_SQL_Connect = "dsn=yourdsn;uid=sa;pwd=yourpwd" conn.open M_SQL_Connect 'conn就是你定义的数据库connection '然后在odbc数据源建一个sqlserver的dsn
conn.ConnectionString = "dsn=interbank;uid=qq;pwd=qiqi;"
conn.Opentypers.ActiveConnection = conn
conn.ConnectionString = "dsn=interbank;uid=qq;pwd=qiqi;"
conn.Open
typers.ActiveConnection = conn
M_SQL_Connect = "dsn=yourdsn;uid=sa;pwd=yourpwd"
conn.open M_SQL_Connect
'conn就是你定义的数据库connection
'然后在odbc数据源建一个sqlserver的dsn