论坛: 编程破解 标题: asp我错在那里 复制本贴地址    
作者: ltb [ltb]    论坛用户   登录
刚学这个, 那位大狭帮一下,我搞了一下午都没搞懂,我错在里,要怎么改才真确,谢谢!
下面的一段程序,保存为11.ASP能提交表单的变量吗?
<form action=" wps/cj.asp" method="post"  >
    <form action=" " method="post"  ><p>姓名
      <input type="text" name="name">
    </p>
    <p> 密码
      <input type="text" name="mima">
    </p>
    <p align="center">
      <input type="submit" name="Submit" value="提交">
      <input type="reset" name="Submit2" value="重置">
    </p>
  </form>

js.asp这个程序是下面的保存的
<%

strings=""

if request.form("name")="" then
      strings=strings&"你必须输入姓名!\n"
end if
if request.form("mima")="" then
    strings=strings&"你必须输入密码 \n"
end if

if strings="" then
    datas="'"& request.form("name")&"','"&request.form("mima")&"'"
    writetodatabase(datas)
end if


%>



jc2.asp是下面的保存的
<%
function writetodatabase(datas)
set objconn=server.createobject(adodb.connection)
objconn.open "driver={microsoft access driver(*.mdb)};dbq="&sever.mappath("pws.mdb")

on error resume next
set rs=objconn.execute(sql)
if rs.eof then
      sql="insert into 表1(姓名,密码)"
      sql=sql&"values("&datas&")"
      on error resume next
      if isobjiconn.execute(sql) then
      location "pws/wc.asp"
    else
      strings="错误。请联系"
    end if
else
    strings="已经有相同的书数据,请改了"
end if
errmsgbox(strings)
end function
%>
<% function errmsgbox(errmsg)%>
<script language="javascript">
<!-
<% if errmsg<>"" then %>
    alert("<%=errmsg %>");
      history.go(-1)
<% end if%>
->
</script>
<% end function %>
<% function location(url)%>
<script language="javascript">
  location="<%=url%>"
</script>
<% end function%>


地主 发表时间: 04-01-18 19:46

回复: 286 [unique]   版主   登录
你的文件名起的太乱了。
11.asp表示提交给"wps/cj.asp",后面确根本没有这样一个文件。
js1.asp和js2也没有直接关系呀。
由于你没有说明你想干什么,所以现在只有猜你的想法了。



<form action="js.asp" method="post"  >
    <p>姓名
      <input type="text" name="name">
    </p>
    <p> 密码
      <input type="password" name="mima">
    </p>
    <p align="center">
      <input type="submit" name="Submit" value="提交">
      <input type="reset" name="Submit" value="重置">
    </p>
  </form>

js.asp这个程序是下面的保存的
<%

strings=""

if request.form("name")="" then
      strings=strings&"你必须输入姓名!\n"
end if
if request.form("mima")="" then
    strings=strings&"你必须输入密码 \n"
end if

if strings="" then
    datas="'"& request.form("name")&"','"&request.form("mima")&"'"
    writetodatabase(datas)
end if


%>

<%
function writetodatabase(datas)
set objconn=server.createobject("adodb.connection")
objconn.open "driver={microsoft access driver(*.mdb)};dbq="&sever.mappath("pws.mdb")

on error resume next
sql="select * from 表1"
set rs=objconn.execute(sql)
if rs.eof then
      sql="insert into 表1(姓名,密码)"
      sql=sql&"values("&datas&")"
      on error resume next
      if isobjiconn.execute(sql) then
      location "pws/wc.asp"
    else
      strings="错误。请联系"
    end if
else
    strings="已经有相同的书数据,请改了"
end if
errmsgbox(strings)
end function

function errmsgbox(errmsg)%>
<script language="javascript">
<!-
<% if errmsg<>"" then %>
    alert("<%=errmsg %>");
      history.go(-1)
<% end if%>
->
</script>
<% end function %>

<% function location(url)%>
<script language="javascript">
  location="<%=url%>"
</script>
<% end function%>

B1层 发表时间: 04-01-19 09:18

回复: ltb [ltb]   论坛用户   登录
终于有人回答了,先谢谢286大哥啊,


我就是想做个表单,经过检联以后存到数据库了啊,


还有那个数据库连接,是怎么搞的啊下面这个是书上写的,怎么看不太明白,谁能解释清楚一些吗?
比如我想连接到一个名叫db1.mdb的数据库,该怎么做啊
set objconn=server.createobject(adodb.connection)
objconn.open "driver={microsoft access driver(*.mdb)};dbq="&sever.mappath("pws.mdb")

B2层 发表时间: 04-01-19 12:20

回复: 286 [unique]   版主   登录
set objconn=server.createobject("adodb.connection")
objconn.open "driver={microsoft access driver(*.mdb)};dbq="&sever.mappath("db1.mdb")


B3层 发表时间: 04-01-19 12:41

回复: hannyu [hannyu]   论坛用户   登录
286是干什么的

B4层 发表时间: 04-01-19 15:48

论坛: 编程破解

20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写:NetDemon

粤ICP备05087286号