asp 缺少标识符
<%user=Request.ServerVariables("QUERY_STRING")Setconn=Server.CreateObject("ADODB.Conn...
<%
user=Request.ServerVariables("QUERY_STRING")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("haha.mdb")
if err then
response.write ("1") '数据库不存在
end if
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from main where user='"&user&"'"
rs.open sqlstr,conn,1,3
if rs.eof then
response.write ("wu")
rs.addnew
rs("user")=user
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
else
response.write rs.("tuiguang")
end if
%>
为什么运行后会
缺少标识符
/index.asp,行 22
response.write rs.("tuiguang") 展开
user=Request.ServerVariables("QUERY_STRING")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("haha.mdb")
if err then
response.write ("1") '数据库不存在
end if
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from main where user='"&user&"'"
rs.open sqlstr,conn,1,3
if rs.eof then
response.write ("wu")
rs.addnew
rs("user")=user
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
else
response.write rs.("tuiguang")
end if
%>
为什么运行后会
缺少标识符
/index.asp,行 22
response.write rs.("tuiguang") 展开
展开全部
两个错误,换行定义未加接续符"_",应改为:
dim posname,addtime,jobFunction1,jobFunction2,jobFunction3,jobLocation1_c,jobLocation2_c, _
jobLocation3_c,calling,ReqAge1,ReqAge2,speciality,ReqDegree,language,resident,Reqcomputer, _
jobtype,Salary,ReqWorkyear,ReqLocation,EndValid,shisu,notes,ExamNotice
另外,第三行与第一行addtime变量重复定义
dim posname,addtime,jobFunction1,jobFunction2,jobFunction3,jobLocation1_c,jobLocation2_c, _
jobLocation3_c,calling,ReqAge1,ReqAge2,speciality,ReqDegree,language,resident,Reqcomputer, _
jobtype,Salary,ReqWorkyear,ReqLocation,EndValid,shisu,notes,ExamNotice
另外,第三行与第一行addtime变量重复定义
追问
没事别乱回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询