IIS7 SQL ODBC和Server 2008 R2（从2003年IIS6转换网站2008 R2 IIS7）

情况：IIS7 SQL ODBC和Server 2008 R2（从2003年IIS6转换网站2008 R2 IIS7）

我有一个网站目前IIS6（srv2003）运行。我已经安装了服务器2008 R2和IIS7.5（版本7.5）的新服务器

一步一步我正在将网站转换为新的IIS7.5，只有一部分仍然无法正常工作。

问题：

下面的脚本（尚未修改，一个从IIS6环境复制）不会使用服务器端（server 2008 R2）上的SQL ODBC连接。我已经阅读了一些关于这方面的文章，并在这些文章中提到了不同的代码，但其中没有一篇是从我的旧代码开始的。所以我尝试了，但失败了。（不幸）

<% 
 
'---- CursorTypeEnum ---- 
 
Const adOpenForwardOnly = 0 
 
Const adOpenKeyset = 1 
 
Const adOpenDynamic = 2 
 
Const adOpenStatic = 3 
 

 
'---- LockTypeEnum ---- 
 
Const adLockReadOnly = 1 
 
Const adLockPessimistic = 2 
 
Const adLockOptimistic = 3 
 
Const adLockBatchOptimistic = 4 
 

 
Function SetConn() 
 
Dim objConn 
 
Set objConn = Server.CreateObject("ADODB.Connection") 
 
objConn.ConnectionString="PDM" 
 
objConn.open 
 
set SetConn=objConn 
 
set objconn=nothing 
 
end function 
 

 
function SetRecord (oConn,strSQL,sCursorType,sLockType) 
 
dim objRS 
 
set objRS=Server.CreateObject("ADODB.Recordset") 
 
objRS.Open strSQL,objConn,sCursorType,sLockType 
 
set SetRecord=objRS 
 
end function 
 
%>

如何能指点正确的方向，（或解决难题）我已经搜索的网站多次，发现非常有用的信息，但遗憾的是我没有找到我的解决方案了。

谢谢你，期待着这些信息。

来源

2015-06-09 Handicare

没有难题。

更换

objConn.ConnectionString="PDM" 
objConn.open

与

objConn.Open 
    "Provider=SQLOLEDB.1;Data Source=adress of server; Initial Catalog=name of used database", 
    "user-name", 
    "user-password"

我用这行代码没有任何问题（Windows 7中，IIS 7.5和SQL-Server 2005中）。由于ODBC不再存在，因此我正在使用OLE。

来源

2015-06-09 12:06:04 reporter

所以我有解决方案，我们仍然在本地机器上使用odbc（32位版本）。但是我们对代码做了一些小的修改，参见下面的新代码和工作代码。帮助记者

<% 
 
'---- CursorTypeEnum ---- 
 
Const adOpenForwardOnly = 0 
 
Const adOpenKeyset = 1 
 
Const adOpenDynamic = 2 
 
Const adOpenStatic = 3 
 

 
'---- LockTypeEnum ---- 
 
Const adLockReadOnly = 1 
 
Const adLockPessimistic = 2 
 
Const adLockOptimistic = 3 
 
Const adLockBatchOptimistic = 4 
 

 
Function SetConn() 
 
Dim objConn 
 
Set objConn = Server.CreateObject("ADODB.Connection") 
 
objConn.open "DSN=PDM;UID=sa;PWD=password" 
 
set SetConn=objConn 
 
set objconn=nothing 
 
end function 
 

 
function SetRecord (oConn,strSQL,sCursorType,sLockType) 
 
dim objRS 
 
set objRS=Server.CreateObject("ADODB.Recordset") 
 
objRS.Open strSQL,objConn,sCursorType,sLockType 
 
set SetRecord=objRS 
 
end function 
 
%>

谢谢

来源

2015-06-10 15:00:34 Handicare

IIS7 SQL ODBC和Server 2008 R2（从2003年IIS6转换网站2008 R2 IIS7）

回答

相关问题