初学者的问题（恳请大家帮忙）

wei131420 2001-07-14 01:59:28
我想做一个页面显示数据库中的内容，请帮忙！我的数据库user中只有两个字段name\tel
应该怎样做啊？请大家写详细点，最好是写全！因为我是初学的，请大家帮忙！
页面显示如下效果：
name tel
小明 886

恳请大家帮忙！
...全文
110 8 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
liugys 2001-07-14
  • 打赏
  • 举报
 回复
正式版
<html>
<head>
<title>数据库内容</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<body>
<%
'定义数据库连接
database=SERVER.MapPath ("user.mdb") '将"user.mdb"改为你的数据库名
table="userinfo" '将"userinfo"改为你的表名
Set conn=Server.CreateObject("Adodb.Connection")
connstr="Driver={Microsoft Access Driver (*.mdb)};DBQ="& database
conn.open connstr
set rs=Server.CreateObject("Adodb.RecordSet")
SQL="SELECT * FROM" & table
rs.Open SQL,conn,1,1
%>
<table width="50%" border="1">
<tr>
<td>姓名：</td>
<td>电话：</td>
</tr>
<%
while not rs.eof
%>
<tr>
<td><%=rs("name")%></td>
<td><%=rs("tel")%></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
rs.close
set rs=nothing
%>
</body>
</html>
liugys 2001-07-14
  • 打赏
  • 举报
 回复
再试试，注意将数据库名和表名改为自己的
<html>
<title>数据库内容</title>
<body>
<%
'定义数据库连接
Set conn=Server.CreateObject("Adodb.Connection")
connstr="Driver={Microsoft Access Driver (*.mdb)};DBQ="& SERVER.MapPath ("user.mdb")
conn.open connstr
set rs=Server.CreateObject("Adodb.RecordSet")
SQL="SELECT * FROM userinfo"
rs.Open SQL,conn,1,1

while not rs.eof '循环显示所有记录
%>
姓名：<%=rs("name")%>　电话：<%=rs("tel")%> <br>
<%
wend
rs.close
set rs=nothing
%>
</body>
</html>
wei131420 2001-07-14
  • 打赏
  • 举报
 回复
上面的好像运行不了啊？请再看看好吗？最好是上机通过。谢了！写好，一定给分！
liugys 2001-07-14
  • 打赏
  • 举报
 回复
给个简单点的，假设你的数据库名为user.mdb,表名为userinfo
<html>
<title>数据库内容</title>
<body>
<%
'定义数据库连接
Set conn=Server.CreateObject("Adodb.Connection")
connstr="PROVIDER=MICROSOFT.JET.OLEDB.4.0;" & "DATA SOURCE=" & SERVER.MapPath ("user.mdb")
conn.open connstr
set rs=Server.CreateObject("Adodb.RecordSet")
SQL="SELECT * FROM userinfo"
StrRes.Open SQL,conn,1,1

while no rs.eof '循环显示所有记录
%>
姓名：<%=rs("name")%>　电话：<%=rs("tel")%> <br>
<%
wend
rs.close
set rs=nothing
%>
</body>
</html>
yunt 2001-07-14
  • 打赏
  • 举报
 回复
记得给分哦
yunt 2001-07-14
  • 打赏
  • 举报
 回复
<%
Dim StrConn,StrRes,StrSQL,StrDSN
Set StrConn=Server.CreateObject("Adodb.Connection")
StrDSN="PROVIDER=MICROSOFT.JET.OLEDB.4.0;" & "DATA SOURCE=" & SERVER.MapPath ("rcinfor.mdb")
StrConn.Open StrDSN
Set StrRes=Server.CreateObject("Adodb.RecordSet")
StrSQL="SELECT * FROM zpzlsr"
StrRes.Open StrSQL,strconn,1,1
sql="select * from qzzlsr"
%>
<%
vid=request.querystring("vid")
if vid="" or not isnumeric(vid) then
response.write "<p align=center>你无权使用"
response.end
end if
set strres=myconn.execute("select * from infor where id="&vid)
if strres.eof and strres.bof then
response.write "<p>你查看的信息被删除了</p>"
else
%>
<html>
<title><%=strres("gw1")%>的详细信息</title>
<link rel=stylesheet href=style.css>
<body>
<br>
<table align="center" width="95%" cellspacing="1" cellpadding="3" bgcolor="#0097d5" >
<tr align="center">
<td colspan="2" bgcolor="#ebf4ff">招聘单位详细信息</td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">招聘单位</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("zpdw")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">招聘岗位</td>
<td width="82%" bgcolor="#ffffff"><%=strres("zpgw")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">招聘专业</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("zpzy")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">招聘人数</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("zprs")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">性别要求</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("xbyq")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">职称要求</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("zcyq")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">工作年限</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("gznx")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">外语要求</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("wyyq")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">外语水平</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("wysp")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">工资待遇</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("gzdy")%></td>
</tr><tr>
<td align=middle width="18%" bgcolor="#ebf4ff">截止日期</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("qzrq")%></td>
</tr><tr>
<td align=middle width="18%" bgcolor="#ebf4ff">学历要求</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("xlyq")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">年龄要求</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("nlyq")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">工作地点</td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("gzdd")%></td>
</tr>
<tr>
<td align=middle width="18%" bgcolor="#ebf4ff">其他要求 </td>
<td width="82%" bgcolor="#FFFFFF"><%=strres("qtyq")%></td>
</tr>
<tr align="center" bgcolor=#ebf4ff>
<td colspan="2">[<a href="javascript:window.close();">关闭窗口</a>]</td>
</tr>
</table>
<%end if%>
</body>
</html>
wei131420 2001-07-14
  • 打赏
  • 举报
 回复
是用access做的，能详尽写下来吗？请帮忙！
ivan2000 2001-07-14
  • 打赏
  • 举报
 回复
用access做啊。
非常简便。
关于php初学者的理解！请大家浏览并指出不足！谢谢！
昨天开始学习php，由于之前是学习.NET的，刚接触php，就关于语法就是各种不适应，什么js，jq在脑子里一团浆糊。。过了一天感觉好了点，现在有点想法，大家欢迎交流批评！ 今天用php做了个登录，判断是否为空的时候，刚开始是将文本框的值直接post到php里，然后判断，后来我想能不能用js，于是试了下，感觉能用，心理特开心，因为脑子清醒了些！于是想法来了！ 以前是html+js+j...
初学者,在ubuntu上编译驱动,出错gcc: error: unrecognized argument in option ‘-mabi=aapcs-linux’,请问各路大神,该怎么解决
这里写自定义目录标题欢迎使用Markdown编辑器新的改变功能快捷键合理的创建标题，有助于目录的生成如何改变文本的样式插入链接与图片如何插入一段漂亮的代码片生成一个适合你的列表创建一个表格设定内容居中、居左、居右SmartyPants创建一个自定义列表如何创建一个注脚注释也是必不可少的KaTeX数学公式新的甘特图功能，丰富你的文章UML 图表FLowchart流程图导出与导入导出导入 初学者,在u...
C语言小白闯关之路——初识C语言
C语言一种编译型计算机语言，C语言源代码都是文本文件，而文本文件本身是无法执行的必须通过编译器的翻译和链接器的链接生成二进制的可执行文件、可执行文件才能执行。小白初来乍到我将在这里分享我的C语言学习经历与学习到的知识，在文章中有错误的地方恳请大家帮忙指出。下面图片中的内容叫做文本信息是放入“xxx.c”的文件中的，是不能执行的因为计算机只能识别和执行二进制的指令。当文本信息经过①编译与②链接后，可生成二进制的可执行程序（包含的都是二进制指令）“xxx.exe”文件这时计算机可以识别和执行。
Python的基本语法元素
大家好，我是霖小白，经济统计学专业，这个主要是自己学习分享，希望对大家有所帮助。先跟大家说说为啥我叫霖小白呢，因为我是作为一个小白来学习知识，而接下来我的学习分享都是一个小白一步一步学起来后所整理的知识再分享给大家。再来说说我的公众号主要有什么内容呢，我比较喜欢Python，我会跟大家一起学习Python，分享我对学习Python过程中的总结分享，这部分内容比较适合的对象是跟我一样的初学者，如果读者是已经掌握并且有一定深入了解的，那么霖小白所分享的内容或许会比较枯燥无味，也不仅仅只有这个内容，我会结合我的专
Yolov8添加CA注意力机制
🏆 本文收录于《全栈Bug调优(实战版)》专栏，致力于分享我在项目实战过程中遇到的各类Bug及其原因，并提供切实有效的解决方案。无论你是初学者还是经验丰富的开发者，本文将为你指引出一条更高效的Bug修复之路，助你早日登顶，迈向财富自由的梦想🚀！同时，欢迎大家关注、收藏、订阅本专栏，更多精彩内容正在持续更新中。让我们一起进步，Up！Up！Up！    备注： 部分问题/难题源自互联网，经过精心筛选和整理，结合数位十多年大厂实战经验资深大佬经验总结所得，数条可行方案供所需之人参考。
ASP

28,409

社区成员

356,971

社区内容

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

加载中

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

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

+ 用AI写文章