asp代码问题

wzzhdda 2003-09-30 01:50:16
我asp没用过,但想再要改!
不知问什么数据更新不了!谢谢
代码:
<!-- #include file="../config/opendatabase1.asp" -->
<%
member_id=trim(request("member_id"))
user_ip=trim(request("user_ip"))
user_mac=trim(request("user_mac"))

sql="update dbstep.member set user_ip='"&user_ip&"',user_mac='"&user_mac&"' where member_id='"&member_id&"'"

opendatabase conn,rs
conn.execute(sql)

%>
<script language="JavaScript">
window.location="aaa1.asp"
</script>
...全文
30 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
wzzhdda 2003-09-30
  • 打赏
  • 举报
回复
没人回答么????
wzzhdda 2003-09-30
  • 打赏
  • 举报
回复
还是不行啊!
stefli 2003-09-30
  • 打赏
  • 举报
回复
member_id是什么类型的哦。
如果是数字型的:
sql="update dbstep.member set user_ip='"&user_ip&"',user_mac='"&user_mac&"' where member_id="&member_id

如果是字符型的:
sql="update dbstep.member set user_ip='"&user_ip&"',user_mac='"&user_mac&"' where member_id='"&member_id&"'"


然后就执行查询语句:
set rs=conn.execute(sql)

或者:
set rs=server.createobject("adodb.recordset")
rs.open sql,conn
wzzhdda 2003-09-30
  • 打赏
  • 举报
回复
从这个代码提交!
<!-- #include file="../config/opendatabase1.asp" -->

<%page=trim(request("page"))%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../config/css_new.css" type="text/css">
<title>ip修改</title>
</head>

<body class="bgl" onkeydown='if(event.keyCode==13 ){search();}'>
<form name="myip" method="post" action="aaa2.asp">
<input type=hidden name=member_id value="<%=member_id%>">
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="22" bgcolor="#2969B5">
<tr>
<td bgcolor="#2969B5" width="12"><img src="../image/index/connerx1.gif" width="12" height="22"></td>
<td bgcolor="#2969B5" width="17"><img src="../image/index/alert_2.gif" width="17" height="22"></td>
<td bgcolor="#2969B5"><font color="#FFFFFF">公司IP修改</font></td>
<td bgcolor="#2969B5" width="12"><img src="../image/index/connerx2.gif" width="12" height="22"></td>
</tr>
</table>
<table width="100%" cellspacing="1" class="tab">
<%
if page="" then
if quary_condition="" then
sql="select * from dbstep.member order by bumen_id asc"
else
if search_name<>"" then
sql_search=sql_search+"true_name like '%"&search_name&"%' and "
end if

if search_bumen<>"0" then
sql_search=sql_search+" bumen_id = '"&search_bumen&"' and "
end if

sql="select * from dbstep.member where "&sql_search&" id<>0 order by bumen_id asc"
end if
session("sql")=sql
else
sql=session("sql")
end if
opendatabase conn,rs
rs.open sql,conn,3
if rs.recordcount<1 then%>
<%
else
countn=rs.recordcount
rs.pagesize=300
page=request("page")
if (isnumeric(page)) then
page=cint(page)
else
page=0
end if
pagemax=rs.pagecount
if not isnumeric(page) then
page=pagemax
elseif page<1 then
page=1
elseif page > pagemax then
page=pagemax
end if
if rs.recordcount<>0 then
rs.AbsolutePage = page
end if
if rs.recordcount>rs.pagesize then
countpage=rs.pagesize
else
countpage=rs.recordcount
end if
for i=1 to countpage
if i mod 2 <>0 then
%>
<tr bgcolor="D0E7FF" align="middle" height="20">
<%
end if
sqlxiangxi="select * from dbstep.bumen where bumen_id="&rs("bumen_id")
opendatabase connxiangxi,rsxiangxi
rsxiangxi.open sqlxiangxi,connxiangxi,3
%>
<td width="747"> <table width="100%" border="0">
<tr>
<td width="20%" height="23"> <div align="center">姓名</div></td>
<td width="29%"><div align="center">ip</div></td>
<td width="29%"><div align="center">mac</div></td>
<td width="22%"> </td>
</tr>
<tr>
<td><div align="center"><%=rs("true_name")%></div></td>
<td><div align="center">
<input type="text" name="user_ip" class="text" size="25" value="<%=rs("user_ip")%>">
</div></td>
<td><div align="center">
<input type="text" name="user_mac" class="text" size="25" value="<%=rs("user_mac")%>">
</div></td>
<td><div align="right">
<input type="submit" name="B1" value="提交">
</div></td>
</tr>
</table></td>
</tr>
<%RS.MoveNext
if rs.eof then exit for
next
Conn.Close
set rs = nothing
set Conn = nothing%>
</table>
<table class="tab" width="100%" cellSpacing=0>
<tr bgcolor="FFFFFF" height="20">
</tr>
</table>
<%end if%>
</form>
</body>

</html>
<%
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
angelheavens 2003-09-30
  • 打赏
  • 举报
回复
<!-- #include file="../config/opendatabase1.asp" -->
<%
member_id=trim(request("member_id"))
user_ip=trim(request("user_ip"))
user_mac=trim(request("user_mac"))

sql="update dbstep.member set user_ip='"&user_ip&"',user_mac='"&user_mac&"' where member_id="&member_id
conn.execute(sql)

%>
<script language="JavaScript">
window.location="aaa1.asp"
</script>
Lincon 2003-09-30
  • 打赏
  • 举报
回复
就从这一行代码是不能看出什么问题的。
ASP.NET开发典型模块大全(修订版)》以关键技术和热点技术为核心,通过27个典型模块和5章热点技术,全面地介绍了如何使用asp.net进行各领域的web项目开发。全书共3篇分为32章,第1篇关键模块篇,覆盖网站开发的关键领域,内容涉及论坛、博客、播客、网络硬盘、电子邮件、在线考试、网站备忘录、在线短消息、网站访问量统计与分析、系统后台管理权限分配等网站关键模块;第2篇常见模块篇,覆盖网站开发的各个领域,内容涉及网站会员注册及登录、会员密码找回、留言本、上传与下载、图片资源管理、搜索引擎、网上问卷调查、rss在线订阅、聊天室、购物车、在线银行支付、手机短消息管理、在线音乐、投票系统、万能打印、数据自动备份与恢复等常见模块;第3篇热点技术应用篇,解决网站开发在某个领域遇到的技术难题,内容涉及linq数据访问技术、安全技术、服务技术、ajax、高级应用技术等。 《ASP.NET开发典型模块大全(修订版)》附有配套光盘。光盘提供了书中所有案例的全部源代码,并经过精心调试,在windows xp和windows 2000下全部通过,保证能够正常运行。此外,光盘中还提供有编程词典试用版软件。 《ASP.NET开发典型模块大全(修订版)》案例涉及领域广泛,实用性非常强。学习本书读者可以了解各个领域的特点,能够针对某一行业进行软件开发,也可以通过光盘中提供的模块源代码进行二次开发,以减少开发系统所需要的时间。本书适合各级软件开发人员学习使用,也可供大、中专院校师生学习参考。

28,408

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧