搜索列表
-
如何制作关联的下拉菜单？
【编程10000问】<form name=f1 METHOD="POST"><%OpenDB objConn, "xxxx"Set RSClass = objConn.Execute("select * from class Order by fldClass")If RSClass.EOF Then Response.Write "噢,没有记录!<BR>"ElseResponse.Write "<select NAME=""class"" style=""FONT-S...
|如何|何制|制作|作关|关联|联的|的下|下拉|拉菜|菜单|单？|？| -
如何在读取Excel文件时创建列表的下拉菜单？
【编程10000问】< select name="XlSheet" >< %vOptions = "< option >< /option >"Do While Not oSchemaRs.EOF If oSchemaRs("TABLE_TYPE") = "SYSTEM TABLE" Then vOptions = vOptions & "< option >" & _ &...
|如何|何在|在读|读取|取E|Ex|xc|ce|el|l文|文件|件时|时创|创建|建列|列表|表的|的下|下拉|拉菜|菜单|单？|？| -
如何用下拉列表显示数据库里的内容？
【编程10000问】<%Dim objDC, objRSSet objDC = Server.CreateObject("ADODB.Connection")objDC.ConnectionTimeout = 15objDC.CommandTimeout = 30' 创建数据库连接objDC.Open "DBQ=" & Server.MapPath("database.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverI...
|如何|何用|用下|下拉|拉列|列表|表显|显示|示数|数据|据库|库里|里的|的内|内容|容？|？| -
如何利用数据库内容建立一个下拉式列表？
【编程10000问】如何利用数据库内容建立一个下拉式列表？<% myDSN="DSN=xur;uid=xur;pwd=xur"mySQL="select * from authors where AU_ID<100"set conntemp=server.createobject("adodb.connection")conntemp.open myDSNset rstemp=conntemp.execute(mySQL)if rstemp.eof thenresponse.write "噢,数据库...
|如何|何利|利用|用数|数据|据库|库内|内容|容建|建立|立一|一个|个下|下拉|拉式|式列|列表|表？|？| -
如何做一个检索结果带链接的检索？
【编程10000问】如何做一个检索结果带链接的检索？<% data=request.form("search_data") ' 从FORM变量集得到要查询的文件名称所要包含的字符串 p=search_folder(data,"http://jack/cgi-bin","c:\intels\wwwroot\cgi-bin") ' 调用函数查询目标查询目录下的所有子目录(所有子树),方法:search_folder(要查询的字符串,查询目标的虚拟绝...
|如何|何做|做一|一个|个检|检索|索结|结果|果带|带链|链接|接的|的检|检索|索？|？| -
如何终止浏览器的Cahce页面？
【编程10000问】如何终止浏览器的Cahce页面？ Function Redirect( NewURL ) If Not IsEmpty( NewURL & "" ) ThenDim QuestionMark QuestionMark = Instr( NewURL, "?" )If QuestionMark = 0 ThenResponse.Redirect NewURL & "?" & NoCacheURL()Response.End ElseRespo...
|如何|何终|终止|止浏|浏览|览器|器的|的C|Ca|ah|hc|ce|e页|页面|面？|？| -
如何编写一个创建FTP站点的函数？
【编程10000问】如何编写一个创建FTP站点的函数？Function ASTCreateFtpSite(IPAddress, RootDirectory, ServerComment, HostName, PortNum, Computer, Start,LogFileDirectory) Dim MSFTPSVC, FtpServer, ...
|如何|何编|编写|写一|一个|个创|创建|建F|FT|TP|P站|站点|点的|的函|函数|数？|？| -
如何实现歌曲在线点播？
【编程10000问】<%dim choose,path,mydb,myset,SQL,fs,mp3' 获得用户提交表单(list.htm)选中的曲目对应的id号,并将其赋给字串变量choose. choose=“("for i=3 to request.form.countchoose=choose＋request.form(i)＋“,"nextchoose=left(choose,len(choose)－1)＋“)"if choose=“()" thenresponse.redirect(“list.htm")resp...
|如何|何实|实现|现歌|歌曲|曲在|在线|线点|点播|播？|？| -
如何用FileSystemObject组件来做一个站内搜索？
【编程10000问】searchpage.htm' 搜索页面.<html><head> <title>千花飞舞之站内搜索引擎</title> </head> <body> <CENTER> &...
|如何|何用|用F|Fi|il|le|eS|Sy|ys|st|te|em|mO|Ob|bj|je|ec|ct|t组|组件|件来|来做|做一|一个|个站|站内|内 -
如何分页显示数据库查询结果？
【编程10000问】<% if Request.QueryString("PageNumber").count > 0 then ' 指定页号的参数PageNumber.如果指定页号,则以指定页号为依据. PageNumber = Request.QueryString("PageNumber")(1)elsePageNumber = 1' 如没指定页号,缺省为1.end ifRecordNumberPerPage = 10 ' 每页显示10条记录. set AR...
|如何|何分|分页|页显|显示|示数|数据|据库|库查|查询|询结|结果|果？|？| -
如何实现全文检索？
【编程10000问】<%@ LANGUAGE="VBscript" %> <html> <head> <meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0"> <meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80"> <title>星河影动之全文检索...
|如何|何实|实现|现全|全文|文检|检索|索？|？| -
如何编写翻页函数？
【编程10000问】page.inc<% Sub ShowPageBar(TotalPage,CurPage,strUrl) ' 参数TotalPage:全部页数;CurPage:当前页数;strUrl:翻页使用的连接地址. DIM strPage CurPage=GetValidPageNO(TotalPage,CurPage) Response.Write "<TABLE WIDTH=''100%''>" Response.Write "<tr><...
|如何|何编|编写|写翻|翻页|页函|函数|数？|？|
