vb6.0中的连接字符串出错

我正在使用此代码在我的表中插入值，，，但我得到的错误为--运行时错误（多步骤OLEDB操作生成错误，请检查每个OLEDB状态值，如果可用） 请检查代码中有什么错误…

请看以下内容：

它说：

以下是两个可能的原因 关于此错误：

在注册表中，OLE DB提供程序的CLSID项下可能有 必须是名为OLEDB_服务的条目。如果 用于 使ADO连接没有 OLEDB_服务条目和ADO 尝试设置一个不可用的属性 由提供程序支持，错误为 发生。有关 此注册表项，请参阅 “决议”部分

如果OLEDB_服务条目存在，但ADO中存在问题 连接字符串，则会发生错误

试试这个：

Dim rs As New ADODB.Recordset



strConnectionString = "Provider=SQLOLEDB.1;Integrated Security=True;Initial Catalog=Hospital_ABC;Data Source=ITEM-47791\SQLEXPRESS;Persyst Security Info=False;Command Properties='Command Time Out=45'"





Set connexion = New ADODB.Connection

connexion.ConnectionString = strConnectionString

connexion.ConnectionTimeout = 30

connexion.Open strConnectionString

rs.Open "insert into student_info(name,rollNo,age, class,address,assigned_teacher)values('name',rollno,age,'cls','add','assteac')", connexion

---

对我来说，错误通常发生在数据对于字段来说太长的时候。您可以通过一次更新一个字段来查找损坏的字段（更新名称，然后更新名称和编号，然后更新名称和编号以及年龄等），从而进一步解决此问题

不要在连接字符串中使用此选项 Persyst Security Info=False；命令属性=“命令超时=45”

rs.Open "insert into student_info(name,rollNo,age,class,address,assigned_teacher) values('n',1,1,'c','a','a')", connexion