| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 498 人关注过本帖
标题:我这段语句有错吗
取消只看楼主 加入收藏
wxm198427
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:3
帖 子:561
专家分:25
注 册:2008-6-30
结帖率:52.7%
收藏
 问题点数:0 回复次数:1 
我这段语句有错吗
test.asp文件
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body><form  name="form1" action="testchk.asp" method="post">
<input type="text" name="name" >用户 <br>
<input type="password" name="password">密码 <br>
<input type="button" name="tj" value="提交">
<input type="reset" name="cancel" value="取消"><br>
</form>
</body>
</html>

testchk.asp文件

<!--#include file="conn.asp"-->
<%
dim rs,sql,name,password
name=trim(request.form("name"))
password=trim(request.form("password"))
if name<>"" and  password<>"" then
set rs=server.CreateObject("adodb.recordset")
sql="select * from user where name='"&name&"' and password='"&password&"'"
rs.open sql,conn,3,3
if not(rs.eof and rs.bof) then
response.write "用户名存在"
else
rs.addnew
rs("name")=name
rs("password")=password
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
end if
else
response.write "用户名和密码不能为空!"
response.end()
end if
%>
搜索更多相关主题的帖子: 语句 
2008-09-05 08:56
wxm198427
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:3
帖 子:561
专家分:25
注 册:2008-6-30
收藏
得分:0 
谢谢了
真的谢谢斑竹的提醒,我知道了!
2008-09-05 16:02
快速回复:我这段语句有错吗
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017149 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved