|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
有以下表单,想查询一条记录,按所选择的字段输出(字段名fieldname1,fieldname2...请按你表中的字段名指定): input.htm <form method="Post" action="test.asp" name="form1"> <input type="text" name="bianhao" size="10"> <input type="checkbox" name="c1" value="fieldname1"> <input type="checkbox" name="c1" value="fieldname2"> ... <input type="submit" value="提交"> </form> 对应的ASP文件如下,这个代码的通用性很强(数据库mymdb.mdb你自己指定,表名tablename你自己指定): test.asp <% Dim fieldnames,fields fieldnames = "" \\\'遍历表单checkbox,将选择的字段存入字符串变量filednames For Each fieldname In Request("c1") fieldnames = fieldnames & "," & fieldname Next \\\'判定是否有选项 If fieldnames = "" Then Response.Write "<center><h2>你至少应选择一个查询字段!</h2></center>" Response.End End If \\\'连接数据库,打开记录集Rs StrSql = "Select "& Mid(fieldnames,2) & " From tablename Where bianhao=\\\'" & Request("bianhao") & "\\\'" StrConn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("mymdb.mdb") Set Rs = Server.CreateObject("ADODB.RecordSet") Rs.Open StrSql,StrConn,1,1 \\\'分解字符串变量filednames,按选择的字段输出结果 fields = Split(fieldnames,",") For i = 1 To UBound(fields) Response.Write fields(i) & ":" & Rs(fields(i)) & "<br>" Next Rs.Close %> 返回类别: 教程 上一教程: ASP应用之模板采用 下一教程: 使你的窗体保留在桌面的最上面 您可以阅读与"查询一条记录,按所选择的字段输出"相关的教程: · 随机访问RECORDSET的一条记录 · 在网页中实现OICQ里的头像选择的下拉框 · 对数据库中的记录用上一条下一条显示(一) · 在ASP中读取ORACLE中的BLOB类型的字段的值,不用ORACLE OBJECT FOR OBJECT · 菜鸟十天学会ASP教程之第六天:查询记录 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |