Question

【高分提问】DW做ASP显示“未发现数据源名称并且未指定默认驱动程序”

新手求解，在自己的计算机上设置NDS和IIS以后运行一切正常。

交作业给老师以后在其他电脑上是“未发现数据源名称并且未指定默认驱动程序”，求问怎么才能让其他的计算机也能正常显示？？？

【conn.asp代码】

<%
Dim MM_conn_STRING
MM_conn_STRING = "dsn=connectmember;"
%>

【register.asp部分代码】
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/conn.asp" -->
<%
Dim MM_editAction
MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)
End If

' boolean to abort record edit
Dim MM_abortEdit
MM_abortEdit = false
%>
<%
' *** Redirect if username exists
MM_flag = "MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
Dim MM_rsKey
Dim MM_rsKey_cmd

MM_dupKeyRedirect = "userexist.asp"
MM_dupKeyUsernameValue = CStr(Request.Form("name"))
Set MM_rsKey_cmd = Server.CreateObject ("ADODB.Command")
MM_rsKey_cmd.ActiveConnection = MM_conn_STRING
MM_rsKey_cmd.CommandText = "SELECT name FROM login WHERE name = ?"
MM_rsKey_cmd.Prepared = true
MM_rsKey_cmd.Parameters.Append MM_rsKey_cmd.CreateParameter("param1", 200, 1, 32, MM_dupKeyUsernameValue) ' adVarChar
Set MM_rsKey = MM_rsKey_cmd.Execute
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
Response.Redirect(MM_dupKeyRedirect)
End If

Answer 1

conn.asp代码：<%
Dim MM_conn_STRING
MM_conn_STRING = "PROVIDER=SQLOLEDB;DATA SOURCE=(local);UID=sa;PWD=密码;DATABASE=数据库名称"
%>

Answer 2

你老师的系统是w7的吧，在iis默认地址池把支持32位那个东西改成true就可以了。