繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 如何从数据库得到一个列表表单
- ASP
- ASP编程入门进阶（十二）：ASP技巧累加（一）
- ASP编程入门进阶（十三）：Ad & Content Rotator
- ASP编程入门进阶（十四）：Browser & Linking
- ASP编程入门进阶（十五）：组件Counters
- 一些简单的ASP练习
- ASP编程入门进阶（十六）：FSO组件之驱动器操作
- ASP编程入门进阶（十七）：FSO组件之文件夹操作
- ASP编程入门进阶（十八）：FSO组件之文件操作（上）
- ASP编程入门进阶（十八）：FSO组件之文件操作（中）
- ASP编程入门进阶（十八）：FSO组件之文件操作（下）
- ASP编程入门进阶（十九）：ASP技巧累加（二）
- ASP中有关双引号，单引号以及&号的解释
- ASP编程入门进阶（二十）：ADO组件之显示数据记录
- ASP编程入门进阶（二十）：ADO组件之插入数据记录
- ASP编程入门进阶（二十）：ADO组件之分页程序
- ASP编程入门进阶（二十）：ADO组件之修改数据记录
- ASP编程入门进阶（二十）：ADO组件之删除数据记录
- ASP初学者常犯的几个错误（ZT）
- 无组件上传图片之文件采用方案
- ASP编程入门进阶（二十）：ADO组件之查询数据记录
ASP 中的 如何从数据库得到一个列表表单
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 100 ::
收藏到网摘: n/a
<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>
Key points of the sample:
sPath is used to construct the path to the database based on the home directory of the script. This means
that the database must be in the same directory as the script., otherwise, set sPath to the absolute path
of the database.
The database is assumed to a be an Access 2000 Database with a table Countries with a character field
Country.
Forms are assumed to point at the same script which created it unless action is specified.
The IF mCountry=... statement is used to insert the word SELECTED into the OPTION containing the previous
country value, should one have been passed in by a submit.
If you have problems running this script, your database drivers may be out of date. Go to
http://www.microsoft.com/data for the current MDAC RTM.
-END-
评论 (0) All
