深圳荣兴饰品有限公司:[Microsoft][ODBC 驱动程序 管理器] 未发现数据源名称并且未指定默认驱动程序
来源:百度文库 编辑:查人人中国名人网 时间:2024/09/21 09:31:13
<%
'绝对路径
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文件夹下面了!请问怎么解决,谢谢啦
'绝对路径
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文件夹下面了!请问怎么解决,谢谢啦
[Microsoft][ODBC
windows系统及微软相关产品>添加 microsoft odbc for oracle 驱动的问题
[Microsoft][ODBC Microsoft Access Driver]常见错误
[Microsoft][ODBC Microsoft Access Driver] 内存溢出
[Microsoft][ODBC Microsoft Access Driver] 内存溢出
ODBC数据源管理器中无microsoft odbc for oracle
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)[Microsoft][ODBC Microsoft Access Driver] ?
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)[Microsoft][ODBC Microsoft Access Driver] ?
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14) [Microsoft][ODBC Microsoft Access Driver]
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'[Microsoft][ODBC Microsoft Access Driver]