<%
Dim sqlStr
Set DataObject=Server.CreateObject("ADODB.Connection")
DataObject.open "Driver={SQL Server};Server=(Local);UID=Esione;pwd=121137;"&_"database=mydb"
empt=DataObject.execute(slqStr)
Response.write(empt("學號"))
empt.close
Set empt=Nothing
%>
我这个代码是连接serverSQL的，总是有错，不知为什么，我查了很多资料，它们连的方法都有点不一样，请前辈指点指点，越详细越好，在此先谢谢你们了！

Set empt=DataObject.execute(slqStr)
首先创建记录集或对象VBScript里，要加Set 关键字
还有slqStr的查询语句在哪里赋值了？

明白,我改完之後都系是那裏的錯誤,我真不知怎麽回事了!
DataObject.open "Driver={SQL Server};Server=(Local);UID=Esione;pwd=121137;"&_"database=mydb"
empt=DataObject.execute(slqStr)
主要還是這句話有錯,不知是不是我的SQL錯誤呢還是這個語法錯誤?謝版主再指教!

Set empt=DataObject.execute(slqStr)
这里要加Set关键字，在VBScript里实例化对象是需要加Set关键字的。

我做好了，谢谢