香港银河集团平台商:[Microsoft][ODBC 驱动程序 管理器] 未发现数据源名称并且未指定默认驱动程序

来源:百度文库 编辑:高校问答 时间:2024/03/29 18:53:30
<%
'绝对路径
const path ="f:\data"
Public Const Dbname = "rc365"
Public Const Dbusername = "rc365"
Public Const Dbpass = "@Ra73&9V#"
Public Const Dsnname = "test"

Const UnitDefault =0 '保留
Const UnitNoposition =1 '没有发布招聘职位的
Const UnitGerneral =2 '上传了有效证件,
Const UnitTry =3 '试用会员
Const UnitPaid =4 '文字会员
Const UnitAdvanced =5 '图片会员
const UnitGold =6 '高级会员
const Unitlietou =7 '猎头会员

Const PersonDefault =0 '没发布求职意向的
Const PersonGeneral =1 '普通人才
Const PersonAdvaced =2 '系统默认高级人才
Const PersonPaid =3 '付费高级人才

dim conn
set conn=server.createobject("adodb.connection")
conn.open Dsnname,Dbusername,Dbpass
conn.execute("use " & Dbname)
function cmdsql(sql)
'insert update delete
on error resume next
conn.execute sql
if err.number<>0 then
response.write Err.description
response.end
else
cmdsql = 1
end if
end function

function exesql(sql)
on error resume next
dim rec
set rec = server.createobject("adodb.recordset")
rec.open sql,conn,3,1,1
if err.number <> 0 then
response.write "<BR> Error: " & err.description
response.end
else
set exesql = rec
end if
set rec = nothing
end function

%>

conn.asp中的代码就是上面哪些,怎么解决这个问题阿!以前自己做的时候不用绝对路径的,这次是修改别人的,高手帮忙~!
用的是sql2000数据库,现在要求必须要用绝对路径怎么解决阿!数据库已经附加到企业管理器中了,我不知道怎么用绝对路径连接!我的数据库放在f:\data文件夹下面了!请问怎么解决,谢谢啦