搜索列表
-
如何用下拉列表显示数据库里的内容?
【编程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问】 <% Dim bSurvey ' 是否显示调查表 const bID="1" ' 调查表的id bSurvey=false ' 检查调查表是否已经显示过. if instr(request.Cookies("s"),":" & bID & ":")=0 then ' 如果...
|如何|何制|制作|作一|一个|个弹|弹出|出式|式的|的调|调查|查窗|窗口|口?|?| -
如何编写一个加法器?
【编程10000问】如何编写一个加法器?<form action="./calculation.asp"><input type="text" size="1" name="op1 value=<%Response.Write Request("op1")%>><input type="submit" name="operation value="plus"><input type="text" size="1" name="op2 value=<%Response.Write Request(...
|如何|何编|编写|写一|一个|个加|加法|法器|器?|?| -
如何做一个只搜索本网站的引擎?
【编程10000问】searchfiles.html <html><head><title>撼雪喷云之本网搜索引擎</title></head><body><form method="POST" action="cgi-bin/searchfiles.asp"> <table border="0" cellpadding="5" bgcolor="#C2E7E3"> <tr&...
|如何|何做|做一|一个|个只|只搜|搜索|索本|本网|网站|站的|的引|引擎|擎?|?| -
如何用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>星河影动之全文检索...
|如何|何实|实现|现全|全文|文检|检索|索?|?| -
如何用POP3接收电子邮件?
【编程10000问】<% Set pop3 = Server.CreateObject( "JMail.POP3" ) pop3.Connect "username", "password", "pop3mail.intels.net" ' POP3的连接用户名,密码,POP3地址. Response.Write( "你现在有" & pop3.count & " 封邮件。<br><br>" ) if pop3....
|如何|何用|用P|PO|OP|P3|3接|接收|收电|电子|子邮|邮件|件?|?| -
如何用ASP发送带附件的邮件?
【编程10000问】如何用ASP发送带附件的邮件?<% Option Explicit Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From = "liyanbing@163.net " objMail.Subject = "闪亮日子之星河影动" objMail.AttachFile("s:\flashdays\images\win.jpg") ...
|如何|何用|用A|AS|SP|P发|发送|送带|带附|附件|件的|的邮|邮件|件?|?| -
如何实现电子邮件的自动发送?
【编程10000问】如何实现电子邮件的自动发送?<%@import namespace="system.web.uit"%>dim mail as new mailmessage ' 建立一个mailmessage对象.mail.to=收件人mail.form=送件人mail.subject=主题mail.bodyformat=格式mail.body=内容smtpmail.send(mail) 具体代码如...
|如何|何实|实现|现电|电子|子邮|邮件|件的|的自|自动|动发|发送|送?|?| -
如何判断电子邮件的地址格式是否正确?
【编程10000问】第一种办法:<% Function IsValidEmail(Email) ValidFlag = False If (Email <> "") And (InStr(1, Email, "@") > 0) And (InStr(1, Email, ".") > 0) Then atCount = 0 SpecialFlag = False For atLoop = 1 To Len(Email) atChr = Mid(Email, atLoop, 1) If atChr ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确?|?| -
如何把图片也存到数据库中去?
【编程10000问】showimage.aspChange the HTTP headerResponse.ContentType = "image/gif"Set cn = Server.CreateObject("ADODB.Connection")cn.Open "driver={SQL Server};server=.;UID=sa;PWD=;DATABASE=pubs"Set rs = cn.Execute("select logo from pub_info WHERE pub_id='0736'")Respons...
|如何|何把|把图|图片|片也|也存|存到|到数|数据|据库|库中|中去|去?|?|