ODBC 驱动程序不支持所需的属性
能正常加入到数据库,但加完就会出现
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/atf/admin/m_s_dis.asp, 第 9 行
' ********* 增加 **************
dis = request.querystring("dis")
set rs2 = server.createobject("adodb.recordset")
sql2 = "select * from pro_dis1 where id="&dis&""
rs2.open sql2,conn,1,1 第九行
if not(rs2.eof or rs2.bof) then
bn=rs2("names")
end if
rs2.close
set rs2 = nothing
if request.form("submit") = "增加" then
names = check_str(trim(request.form("names")))
if names = "" then
response.write ""
response.end
end if
sql = "insert into pro_dis2(names,bname,bid) values ('"& names &"','"& bn &"','"& dis &"')"
conn.execute sql
conn.close
set conn = nothing
mess "类别添加成功","恭喜您,产品类别添加成功,请等待……","m_s_dis.asp"
response.end
end if
' ********* 删除 ********
if request.form("submit") = "删除" then
id = request.querystring("id")
sql = "delete * from pro_dis2 where id=" & id
conn.execute sql
sql_2 = "delete * from product1 where cid=" & id
conn.execute sql_2
conn.close
set conn = nothing
mess "类别删除成功","恭喜您,产品类别删除成功,请等待……","m_s_dis.asp"
response.end
end if
' ******** 修改 *************
if request.form("submit") = "修改" then
names = check_str(trim(request.form("names")))
id = request.querystring("id")
sql = "update pro_dis2 set names='"& names &"' where id=" & id
conn.execute sql
conn.close
set conn = nothing
mess "修改成功","恭喜您,产品类别修改成功,请等待……","m_s_dis.asp"
response.end
end if
%>
1个回答
你换种数据库连接的方式
各种数据库连接代码:
MS Access数据库连接
用DSN连接并且没有用户名和密码:
set conn = Server.CreateObject("ADODB.Connection")
conn.open "YourDSNName"
%>
用DSN连接并且有用户名和密码:
set conn = Server.CreateObject("ADODB.Connection")
conn.open "YourDSNName","username","password"
%>
用实际的数据库绝对路径连接:
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=e:\yanhang\database.mdb"
conn.Open Strconn
%>
用实际的数据库相对路径连接:
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("/database/yanhang.mdb")
conn.Open Strconn
%>
MS SQL Server数据库连接
用DSN连接:
set conn = Server.CreateObject("ADODB.Connection")
conn.open "DSN=MyDSN;UID=user;PWD=password;DATABASE=databasename"
%>
不用DSN连接:
Set conn = Server.CreateObject("ADODB.Connection")
DSNtemp="DRIVER={SQL Server};SERVER=ServerName;UID=USER;PWD=password;DATABASE=databasename"
conn.open DSNtemp
%>
FoxPro数据库连接
Set Conn = Server.CreateObject("ADODB.connection")
ConnStr= "Driver=Microsoft Visual Foxpro Driver; UID=userID;SourceType=DBC;SourceDB=C:\yanhang\database.dbc"
Conn.Open ConnStr
%>
Oracle数据库连接:
set conn=server.createobject("adodb.connection")
conn.cursorlocation=adUseClient
DSNTemp="Provider=MSDAORA.1;Password=xxxxx;User ID=yanhang;Data Source=xxx.world"
conn.open DSNtemp
%>
参考资料:http://www.5axx.net/article/asp/112714142.html
◆◆
评论读取中....
请登录后再发表评论!
◆◆
修改失败,请稍后尝试
精华知识