|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<HEAD> <TITLE>ASPHole - Fill List Box Example</TITLE> </HEAD> <BODY> <FORM METHOD=POST> Country: <SELECT NAME="Country"> <% \\\' Construct path to database sPath = Request.ServerVariables("Path_Translated") sPath = Left(sPath,InStrRev(sPath,"")) & "Countries.mdb" \\\' \\\' Open Connection & Recordset set oSample = Server.CreateObject("ADODB.Connection") oSample.Open _ "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Persist Security Info=TRUE;" & _ "Data Source=" & sPath, "Admin", "" \\\' \\\' Check for default... mCountry = Trim(Request("Country")) \\\' \\\' Create the List Set oRS=oSample.Execute _ ("SELECT ID,COUNTRY " & _ "FROM COUNTRIES " & _ "ORDER BY ID") DO WHILE NOT oRS.EOF mSelected = "" IF mCountry=trim(oRS("Country")) then mSelected=" SELECTED" %> <OPTION<%=mSelected%>><%=oRS("Country")%></OPTION> <% oRS.MoveNext Loop %> </SELECT><BR> <INPUT TYPE=SUBMIT> </FORM> </BODY> </HTML> 返回类别: 教程 上一教程: SERVER.SCRIPTTIMEOUT:处理脚本运行时间长的方式 下一教程: ASP中查询数据库记录写入XML文件示例 您可以阅读与"如何从数据库得到一个列表表单"相关的教程: · 如何做一个高效的ASP数据库操作程序 · 如何从ACCESS数据库中读取图形(续) · 从数据库中动态选取下拉列表的方式 · 如何从ACCESS数据库中读取图形 · 如何用最简朴的语句提交大量表单对象的值存储到数据库 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |