Sql server 2005 用于连接到SQL Server 2005并更新表的VBScript

我不熟悉VBScript。有人能帮我用VBScript连接到SQL Server 2005（OLEDB）并更新数据库中的表吗

我的服务器：sql14\qw
我的数据库：fret
用户id:admin
Pasword:通过

---

表名：查找实际上是简单的东西。首先，必须定义要使用的连接和记录集：

Set AdCn = CreateObject("ADODB.Connection")
Set AdRec = CreateObject("ADODB.Recordset")

之后，所有内容都与连接字符串有关：

connstr="Provider=SQLOLEDB.1;Data Source=" & server & ";Initial Catalog=" & database & ";user id = '" & uid & "';password='" & pwd & "'"

字符串由几个部分组成：

• 提供者：您正在建立的连接类型，在本例中为SQL Server

• 数据源：您要连接到的服务器

• 初始目录：数据库的名称

• 用户id：您的用户名

• 密码：嗯，你的密码。；）

请注意，如果要使用Windows登录凭据并在本地运行脚本，则可以用以下内容替换用户名和密码字段：

Integrated Security=SSPI

当然，如果您在网站上使用脚本，这将不起作用，因此您必须显式使用用户名和密码。然后，确保连接已打开，只需打开记录集，移交SQL查询，并将返回的数据捕获为数组

SQL="Select @@version as name"
AdCn.Open connstr
AdRec.Open SQL, AdCn,1,1
queryReturn=Adrec("name")

请记住，数据是作为数组返回的（通常是二维的，您想要的结果实际上是在数组的第二维！），您可能需要修剪以消除结果末尾的空格，或者使用字符串函数（如Left）解析结果。就我个人而言，我总是在将结果赋给变量时修剪（）结果，因为我被隐藏空格咬的次数超过了我的计数

Const DB_CONNECT_STRING = "Provider=SQLOLEDB.1;Data Source=sql14\qw;Initial Catalog=fret;user id ='admin';password='pass'"
Set myConn = CreateObject("ADODB.Connection")
Set myCommand = CreateObject("ADODB.Command" )
myConn.Open DB_CONNECT_STRING
Set myCommand.ActiveConnection = myConn
myCommand.CommandText = "UPDATE lookup SET Col1 = 'Hello'"
myCommand.Execute
myConn.Close

---

使用集成Windows安全性进行测试，但未使用SQL登录进行测试。

谢谢。但是，你在例子中把connstr放在哪里？@Pete该行

AdCn.Open connstr

被省略了。将其放在打开的

地址之前