ASP与JavaScript脚本的问题!!!
zpskm 2004-04-15 02:18:20 各位大侠:
下面的一段代码是用Vbscript脚本编写的ASP页面,其功能是向数据库里写数据,一切正常。而我现在想用Javascript脚本实现相同功能,不知该如何修改,Javascript脚本支持有关数据库的操作吗,支持在服务器端代码里调用组件吗?如果可以的话,又该如何实现呢?
<%@language=vbscript%>
<%
Response.Buffer = True
on error resume next
dim userno
dim minu
userno = request("t1")
minu = request("minu")
'打开数据库
dim cn
dim rs
set cn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
cn.Open "Driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("regdb.mdb")
'读取数据
rs.open "select * from fpreg where userno = '"+userno+"'",cn,1,1
dim minua
if not rs.eof then
minua = rs("fpminu")
dim tt,lRt
set tt=server.createobject("Finger.Service") ‘调用组件
lRt = tt.VerFinger(minu,minua)
if lRt = 1 then
response.write "比较成功"
response.write "<br>"
response.write "用户是:" + rs("username")
response.write "<br>"
else
response.write "比较失败"
end if
else
response.write "没有满足条件的记录"
end if
if err.number<>0 then
rs.close
set rs=nothing
cn.close
set cn=nothing
response.write "error"
else
rs.close
set rs=nothing
cn.close
set cn=nothing
end if
%>
请各位大侠帮忙看看,在下不胜感激!!!