数据库连接出错

[cqsjchh]

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
运行时出错
但把数据库文件换成另外一个就不出现这样的问题了

[凡夫与俗子]

代码贴出来看下。实在不行就换种连接写法吧

[sumjor]

把代码贴出来看看

[cqsjchh]

这是DBconn.inc中的代码

<%
'On Error Resume Next

Function   ValidSQL() 
ValidSQL = True 
Dim Invalid
Dim Server_From
Dim Server_Now
Dim Collection 

Invalid		=	split( "'|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare","|") 
Server_From	=	Cstr(Request.ServerVariables("HTTP_REFERER"))
Server_Now	=	Cstr(Request.ServerVariables("SERVER_NAME"))

Set Collection	=	Request.QueryString 
     
If  Len(Collection)>4 Then 
	For Each Arg In Collection 
		For I=0 To Ubound(Invalid) 
			If Instr(Collection(Arg),Invalid(I))>0 Then 
			ValidSQL	=	false 
			Exit For 
			End If 
		Next 
	
		If ValidSQL	= False Then 
		Response.Write( "输入中包含非法字符,请重新输入! ") 
		Response.End()
		Exit For 
		End If 
	Next 
	End If 
End Function

Call ValidSQL()

DataURL	= "E:\2008项目\大家房产\DB\q2@oie$tu2mko@$pi9u#r5&xzcv@.mdb"
'Strsql	= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataURL 
Strsql	= "driver={Microsoft Access Driver (*.mdb)};dbq=" & DataURL
set dbconn=server.createobject("ADODB.CONNECTION")
dbconn.open Strsql 
%>

这是网页文件中的代码

 <%
						  	Set Rs=Server.CreateObject ("ADODB.Recordset")
							StrSQL="SELECT Top 7 * FROM House WHERE House_Sort='出租'and State=True ORDER BY S_ID DESC"
							Rs.Open StrSQL,Dbconn,1,1
							Do Until Rs.EOF
							
							If Rs.BookMark Mod 2 Then
								TempColor="#f5f6f0"
							Else
								TempColor="#FFFFFF"
							End If
							%>

[凡夫与俗子]

Strsql = "driver={Microsoft Access Driver (*.mdb)};dbq=" & DataURL
换成试试strsql="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&DataURL&"")

[ZSJ_COOL]

DataURL = "E:\2008项目\大家房产\DB\q2@oie$tu2mko@$pi9u#r5&xzcv@.mdb"
这里是错的 因为IIS有域跟着的 不会 操作到域外面的 数据库的 除非你用SQL SERVRE数据库！、
请把你的数据库放到 你的源码下面的某个文件 比如web/db
IIS指向的是 web dateUrl就会写成db/@oie$tu2mko@$pi9u#r5&xzcv@.mdb

[toury]

DataURL = "E:\2008项目\大家房产\DB\q2@oie$tu2mko@$pi9u#r5&xzcv@.mdb"
不要写绝对路径
如果你的网站根目录是"E:\2008项目\大家房产\",这样：
DataURL="/DB/q2@oie$tu2mko@$pi9u#r5&xzcv@.mdb"
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(DataURL)
set dbconn=server.createobject("ADODB.CONNECTION")
dbconn.open strConn

[cqsjchh]

谢谢六楼