高考问答惠州科技学校官网2017:一个关于表单的问题
来源：百度文库 编辑：高考问答 时间：2024/07/04 23:38:26
If request("action")="add" then
if name<>"" pass<>"" email<>"" xingming<>"" Then
set rs1=server.CreateObject("adodb.recordset")
rs1.Open "huiyuan",conn,3,3
rs1.addnew
rs1("name")=name
rs1("pass")=pass
rs1("email")=email
rs1("xingming")=xingming
rs1.update
rs1.close
response.Redirect("ok1.asp")
Else
Response.Redirect ("ok2.asp")
end if
if name<>"" pass<>"" email<>"" xingming<>"" Then
set rs1=server.CreateObject("adodb.recordset")
rs1.Open "huiyuan",conn,3,3
rs1.addnew
rs1("name")=name
rs1("pass")=pass
rs1("email")=email
rs1("xingming")=xingming
rs1.update
rs1.close
response.Redirect("ok1.asp")
Else
Response.Redirect ("ok2.asp")
end if
缺少的东西比较多~
你要问什么问题？
就这段代码也有问题。。
第一个IF缺少END IF