金素丽歌曲:如何在VB中限制SQL数据库字符长度

回答：小可丁丁
学姐
6月12日 01:03 1.在使用ADO之前，必须先利用VB菜单中的“工程/引用”来引用“Microsoft ActiveX Data Objects 2.0 Librabry”，
然后ADO对象群中的Connection、Recordset、Command、Fields等对象才会成为程序可以引用的对象。

2.在窗体上布置一个ADODC控件，然后单击鼠标右键，待出现快捷菜单时，从中选取“ADODC属性”命令。

3.这个时候会打开“属性页”对话框，在对话框中选取“使用连接字符串”选项，并单击“生成”按钮。

4.之后出现的是“数据连接属性”(Data Link Properties)设置窗口，按照下面步骤执行：
〈1〉OLE DB提供者：想要连接的SQL Server，要选择Microsoft OLE DB Provider for SQL Server。
〈2〉输入Server名称：输入您安装SQL Server计算机的名称。
〈3〉输入UserName用户名称和Password用户密码：可以存取SQL Server的用户名称和密码。
〈4〉选取数据库：如果前面几个选项均输入正确的话，那么单击这个选项的下拉按钮，就可以列出SQL Server的所有数据库名称，再从中选取其中你的数据库名称。如果单击这个下拉按钮之后没有看到任何数据库名称，那么即表示您前面几个步骤中输入的内容有错误。

最后点击确认。

5.在成功连接到SQL Server中您的“进销存管理”数据库后，就可以开始下一步连接数据表的操作了，具体步骤如下：
〈1〉假设您要打开的表是 “MSFlexGrid”， 则将ADODC控件的属性中的CommandType设置成“AdCmdTable”。
〈2〉将ADODC控件中的RecordSource属性设置成您的表名，例如
“MSFlexGrid”。

6.完成这些步骤后就可以连接到您想使用的数据表了，代码步骤如下

在引用中添加Microsoft ActiveX Data Objects 2.X Library

代码如下:

Dim CN As New ADODB.Connection
Dim RS As New ADODB.Recordset
Dim strServerName, strUID, strPWD, strDataBase
Dim strConnect As String

'定义连接字符串
strServerName = 服务器名，或者服务器IP
strUID = 用户名
strPWD = 密码
strDataBase = 数据库名
strConnect = "Driver={SQL Server};Server=" & strServerName & ";UID=" & strUID & ";PWD=" & strPWD & ";DataBase=" & strDataBase
'连接到数据库
CN.Open strConnect

Set RS = CN.Execute("SELECT * FROM ....")

该回答在6月12日 01:20由回答者修改过