急！！！大家帮忙看看为什么textbox显示不出数据库里的数据！！！

yuzhouer1122 2008-12-29 03:29:11
本人新手！大家帮我看看为什么显示不出数据库的数据呢。
还请大家多多关照。多给小弟指导指导！！
谢谢了。
<a href="user_amend.asp?uri=<%=rs.Fields("userid")%>">修改</a>  这段代码是连接修改页面并让修改页面根据ID显示出数据


<%@ Language=VBScript %>

<HTML>

<HEAD>

<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">

</HEAD>

<BODY>

<form name="form1" action="user_amend.asp" method="post">

<%

Dim conn,rs,txtsql

	set conn = server.CreateObject("ADODB.Connection")

	conn.connectionstring = "driver=microsoft access driver (*.mdb);dbq=" & server.MapPath("/test") & "\exam.mdb"	 

	conn.open

	set rs = server.CreateObject("ADODB.RecordSet")

	if len(Request.Form("txtname"))>0 then

	txtsql = "UPDATE user SET username='" & Request.Form("txtname") & "',userpass='" & Request.Form("txtpass") & "',sex='" & Request.Form("selectsex") & "',address='" & Request.Form("txtaddr") & "',mail='" & Request.Form("txtmail") & "'where userid='" & Request.Form("uri") & "'"

	conn.Execute txtsql

	end if

	txtsql = "select * from user where userid=" & Request.Form("uri") & ""

	rs.Open txtsql,conn,1,3

	if not rs.eof then

%>

<P align=center>修改用户信息<p>

<P align=center>用 户 名 <input name="txtname" value="<%=Request.Form("username")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center>用户密码 <input type="text" name="txtpass" value="<%=Request.Form("userpass")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center> 

性    别 <SELECT id=select1 name=selectsex value="<%=Request.Form("sex")%>" style="WIDTH: 159px"><OPTION></OPTION><OPTION value=男>男</OPTION><OPTION value=女>女</OPTION></SELECT><p>

<P align=center>

地    址 <input name="txtaddr" value="<%=Request.Form("address")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center>电子邮件 <input name="txtmail" value="<%=Request.Form("mail")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center>

<input type="hidden" name="uri" value="<%=Request.Form("uri")%>">

<input type="submit" name="button1" value="保存">

<input type="button" name="button2" value="返回"><p>

<%

	end if

rs.close

set rs = nothing

conn.Close

set conn = nothing

%>

</form>

<script language="VBScript">

<!--

sub button2_OnClick()

	window.location.href="userinfo.asp"

end sub

-->

</script>

</BODY>

</HTML>
...全文
61 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
yuzhouer1122 2008-12-29
  • 打赏
  • 举报
 回复
谢谢了。。还有个问题。。就是性别哪里显示不出来。。是不是下拉列表框跟textbox的方法不一样啊。。
那该怎么改呢？
[Quote=引用 3 楼 liuhaibing0903 的回复:]
还有各个表单元素的value应是根据传来的ID值读取数据库后的值吧
由于不知道你DB里的字段，所以用你原来的代替，修改如下：
VBScript code<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<form name="form1" action="user_amend.asp" method="post">
<%
Dim conn,rs,txtsql
set conn = server.CreateObject("ADODB.Connection")
co…
[/Quote]
yuzhouer1122 2008-12-29
  • 打赏
  • 举报
 回复
<P align=center>用 户 名 <input name="txtname" value="<%=Request.Form("username")%>"
这里面啊
[Quote=引用 2 楼 layers2323 的回复:]
丫的，你在哪儿显示rs来着？
倒是说说清楚。
[/Quote]
liuhaibing0903 2008-12-29
  • 打赏
  • 举报
 回复
还有各个表单元素的value应是根据传来的ID值读取数据库后的值吧
由于不知道你DB里的字段，所以用你原来的代替，修改如下：
<%@ Language=VBScript %>

<HTML>

<HEAD>

<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">

</HEAD>

<BODY>

<form name="form1" action="user_amend.asp" method="post">

<%

Dim conn,rs,txtsql

    set conn = server.CreateObject("ADODB.Connection")

    conn.connectionstring = "driver=microsoft access driver (*.mdb);dbq=" & server.MapPath("/test") & "\exam.mdb"     

    conn.open

    set rs = server.CreateObject("ADODB.RecordSet")

    if len(Request.Form("txtname"))>0 then

    txtsql = "UPDATE user SET username='" & Request.Form("txtname") & "',userpass='" & Request.Form("txtpass") & "',sex='" & Request.Form("selectsex") & "',address='" & Request.Form("txtaddr") & "',mail='" & Request.Form("txtmail") & "'where userid='" & Request.Form("uri") & "'"

    conn.Execute txtsql

    end if

    txtsql = "select * from user where userid=" & Request.QueryString("uri") & ""

    rs.Open txtsql,conn,1,3

    if not rs.eof then

%>

<P align=center>修改用户信息<p>

<P align=center>用 户 名 <input name="txtname" value="<%=Rs("username")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center>用户密码 <input type="text" name="txtpass" value="<%=Rs("userpass")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center> 

性    别 <SELECT id=select1 name=selectsex value="<%=Rs("sex")%>" style="WIDTH: 159px"><OPTION></OPTION><OPTION value=男>男</OPTION><OPTION value=女>女</OPTION></SELECT><p>

<P align=center>

地    址 <input name="txtaddr" value="<%=Rs("address")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center>电子邮件 <input name="txtmail" value="<%=Rs("mail")%>" style="WIDTH: 159px; HEIGHT: 24px" size=21><p>

<P align=center>

'<input type="hidden" name="uri" value="<%=Rs("uri")%>">

<input type="submit" name="button1" value="保存">

<input type="button" name="button2" value="返回"><p>

<%

    end if

rs.close

set rs = nothing

conn.Close

set conn = nothing

%>

</form>

<script language="VBScript">

<!--

sub button2_OnClick()

    window.location.href="userinfo.asp"

end sub

-->

</script>

</BODY>

</HTML>
layers2323 2008-12-29
  • 打赏
  • 举报
 回复
丫的，你在哪儿显示rs来着？
倒是说说清楚。
liuhaibing0903 2008-12-29
  • 打赏
  • 举报
 回复 
txtsql = "select * from user where userid=" & Request.Form("uri") & ""
你是用GET方式传的值，改成
txtsql = "select * from user where userid=" & Request.QueryString("uri") & ""
winform常用控件
主要包含内容：第一讲 课程简介第二讲 Windows窗体-创建和介绍第三讲 Windows窗体-属性第四讲 Windows窗体-方法和事件第五讲 Windows窗体-MDI窗体和子窗体第六讲 控件的相关操作第七讲 Label控件显示世界你好第八讲Button控件第九讲TextBox控件第十讲RichTextBox控件第十一讲ComboBox控件等
datagrid显示mysql_用DataGrid显示数据库内容
usingSystem;usingSystem.Collections;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Web;usingSystem.Web.SessionState;usingSystem.Web.UI;usingS...using System;using System.C...
数据库系统设计综合实验
数据库系统设计综合实验 实验目的 通过实验，使学生掌握数据库系统设计和开发的一般方法，能够设计并实现简单的数据库系统。 实验要求 熟悉实验室实验环境，掌握实验预备知识，了解实验中故障排除的基本方法。实验中根据实验要求完成相应的任务，并独立完成实验报告。 实验内容 设计的数据库系统可从以下题目中选择，但不限定于以下题目，可自由选择。 需提供系统简要的需求分析，给出大体的功能介绍；完成数据库的概念结构设计，建议用PowerDesigner画出系统的逻辑结构图或物理结构图（也可以使用其他工具）；任选自己熟悉的数据
小白写C#数据库操作的那些坑
作为新学者操作数据库的操作时，无疑会遇到很多坑，特别是写SQL语句时很容易遇到各式各样的坑，下面来先列举一下新手们有可能遇到坑 （1）关键符前忘记加上空格出现报错 这个输出的错误是“.”附件有错误，也就是SQL语句出错，而当你仔细看语句并没有发现那里写错的，而实际上是from前面忘记加上空格，导致from与前面的“成绩”连起来了，出现了SQL语句错误，为了杜绝重复放这种错误，建议写SQL语句时加
数据绑定控件之一DataList控件的使用
本章内容： 1、理解事件冒泡 2、使用模板 3、在DataList中显示数据 4、在 DataList中创建多列 5、捕获DataList控件中产生的事件 6、选择DataList中的项 7、使用DataList控件中的DataKeys集
ASP

28,391

社区成员

357,060

社区内容

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

加载中

查看更多榜单
社区公告
暂无公告

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

+ 用AI写文章