3.2w+
社区成员
- 主页
- 基础类
- 应用实例
- 新技术前沿
...全文
请发表友善的回复…
发表回复
愉快的登山者 2003-01-16
连接属性值：VB与数据库的连接参数。
pengdali 2003-01-15
是ADO吗？？
Dim StrCon As String
StrCon = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;" _
& "Initial Catalog=你的数据库名称;Data Source=" & 你的IP地址 & ";" _
& "Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;" _
& "Use Encryption for Data=False;Tag with column collation when possible=False"
dim AcSys as new adodb.connection
With AcSys
If .State = adStateOpen Then .Close
.NonnectionString = StrCon
.ConnectionTimeout = 30
.Open
End With
Dim StrCon As String
StrCon = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;" _
& "Initial Catalog=你的数据库名称;Data Source=" & 你的IP地址 & ";" _
& "Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;" _
& "Use Encryption for Data=False;Tag with column collation when possible=False"
dim AcSys as new adodb.connection
With AcSys
If .State = adStateOpen Then .Close
.NonnectionString = StrCon
.ConnectionTimeout = 30
.Open
End With