ADO的例子
m_webconn As ADODB.Connection
m_webconn.ConnectionString = "Provider=SQLOLEDB.1;Password=pwd;Persist Security Info=True;User ID=username;Initial Catalog=database;Data Source=host"
m_webconn.Open
m_webconn As ADODB.Connection
m_webconn.ConnectionString = "Provider=SQLOLEDB.1;Password=pwd;Persist Security Info=True;User ID=username;Initial Catalog=database;Data Source=host"
m_webconn.Open
Dim rs As New Recordset
conn.ConnectionTimeout = 0
conn.CommandTimeout = 0
db_string = "Provider=SQLOledb.1;Data Source=" & sql_server & ";Initial Catalog=" & sql_data_name & ";User ID=" & sql_login_name & ";Password=" & sql_login_pwd & ";Persist Security Info=False"
conn.Open db_string
rs.Open your_sql, conn, adOpenStatic, adLockOptimistic
m_webconn.ConnectionString = "Provider=SQLOLEDB.1;Password=pwd;Persist Security Info=True;User ID=username;Initial Catalog=database;Data Source=host"
m_webconn.Open
以上这行语句用在VB行不行啊?“Data Source=host”数据源怎能么建成立啊?
SSPI 是Security Support Provider Interface的缩写,意思是对连接的PACKAGES进行加密传输.
Dim conn As New Connection
Dim rs As New Recordset
dim dbconcstring$
'第一种,用户名验证的方式
dbconcstring= "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=用户名;Password=密码;Initial Catalog=;Data Source=服务器名;Initial Catalog=数据库名"
Case "DataConc2"
'第二种,用Nt难的方式
dbconcstring = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=;Data Source=服务器名;Initial Catalog=数据库名"conn.Open dbconcstring
rs.Open "你的sql语句或表或视图", conn, adOpenStatic, adLockOptimistic