搜索列表
-
如何远程读取数据库页面?
【编程10000问】<%Set HttpObj = Server.CreateObject("AspHTTP.Conn")dim docnumdocnum = 101do while docnum <> 111 Response.Write docnumHTTPObj.Url = "http://www.intels.net/date.asp?songID="&docnumHttpObj.RequestMethod = "GET"strResult = HTTPObj.GetURLRes...
|如何|何远|远程|程读|读取|取数|数据|据库|库页|页面|面?|?| -
如何用ASP输出HTML文件?
【编程10000问】<!--#include file="top.inc"--><%u_title=request.form("u_title")' 检查标题是否被输入.if u_title = "" then%><form method="POST" action="<%= request.servervariables("script_name") %>"> <!--当没有标题输入时显示输入框--> <p>文件标题<...
|如何|何用|用A|AS|SP|P输|输出|出H|HT|TM|ML|L文|文件|件?|?| -
如何用ASP建立Index Server查询对象并为其参数赋值?
【编程10000问】一个方法是利用Index Server query object和参数:<% Set Q= Sever.CreatObject("ixsso.Query") ' 创建查询对象. Set Util= Sever.CreatObject("ixsso.Util") Q.Query= Request("SearchString") ' 查询字段....
|如何|何用|用A|AS|SP|P建|建立|立I|In|nd|de|ex|xS|Se|er|rv|ve|er|r查|查询|询对|对象|象并|并为|为其|其参|参 -
如何验证IP地址?
【编程10000问】 sub chkIP(boardid) dim rsIP dim ipArr dim ignored dim i dim ip dim sql ip=Request.ServerVariables("REMOTE_ADDR") ignored=false if not isempty(boardid) then sql="select ignoreip from board where boa...
|如何|何验|验证|证I|IP|P地|地址|址?|?| -
如何修改被表单引用的ASP页面?
【编程10000问】formhandler.asp<html><body><%Dim RequestMethod RequestMethod = Request.ServerVariables("REQUEST_ METHOD") ' 获取REQUEST_METHOD的数值,并把它存入本地的变量中.当Web页面被表单标记的Action参数调用时,REQUESTMETHOD的数值为Post.其他时候, ...
|如何|何修|修改|改被|被表|表单|单引|引用|用的|的A|AS|SP|P页|页面|面?|?| -
如何显示最后十名来访者?
【编程10000问】<%Application.LockIF NOT isArray( Application( "lastTen" ) ) THEN DIM dummy( 10, 3 ) Application( "lastTen" ) = dummy' 创建或者取得最近10个Application数组.END IF lastTen = Application( "lastTen" )Application.UnLockIF lastTen( 9, 0 ) <> ...
|如何|何显|显示|示最|最后|后十|十名|名来|来访|访者|者?|?| -
如何读取一个.ini文件?
【编程10000问】<OBJECT ID="agobjOraSession" RUNAT="Server" PROGID="OracleInProcServer.XOraSession" SCOPE="Application"></OBJECT><script LANGUAGE=VBScript RUNAT=Server>Const CONST_FL_NAME = "\GetAttributeCode.ini"Const CON...
|如何|何读|读取|取一|一个|个i|in|ni|i文|文件|件?|?| -
如何编写TOP 10之类的排行榜?
【编程10000问】<% @ LANGUAGE="VBscript" %><% OPTION EXPLICIT %><!--#include file="DataConn.asp"--><!--#include file="FuncSet.asp"--><% dim rs,sql,IDa,IDb,s,RegUser,a,b,c Set rs=Server.CreateObject("ADODB.recordset")&...
|如何|何编|编写|写T|TO|OP|P1|10|0之|之类|类的|的排|排行|行榜|榜?|?| -
如何把一个Excel文件放到ASP页面中去?
【编程10000问】<%set xlApp = Server.CreateObject("Excel.Application")xlApp.Visible = false' 使服务端不出现Excel窗口.set myWorkbook = xlApp.Workbooks.Add' 建立一个worksheet.set myWorksheet = myWorkbook.Worksheets(1)myWorksheet.Range("A1").Value = '精彩春风通讯录'myWorksheet.Range("A1")...
|如何|何把|把一|一个|个E|Ex|xc|ce|el|l文|文件|件放|放到|到A|AS|SP|P页|页面|面中|中去|去?|?| -
如何把Recordset转换成彩色的XML文件
【编程10000问】<%@ codepage="65001" %><!-- #INCLUDE FILE="ADOVBS.INC" --><%Response.ContentType = "text/xml"' 如果不在 adovbs.inc 里,则设置一个常量. Set Con = Server.CreateObject( "ADODB.Connection" )Con.Open "Provider=sqloledb;UID=sa;DATABASE=...
|如何|何把|把R|Re|ec|co|or|rd|ds|se|et|t转|转换|换成|成彩|彩色|色的|的X|XM|ML|L文|文件|件| -
网上考试设计思路是怎样的?
【编程10000问】global.asa < script LANGUAGE=VBScript RUNAT=Server >Sub Application_OnStart dbPath = "DBQ=" & Server.Mappath("onlinetest.mdb") dbConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; " & dbPath ...
|网上|上考|考试|试设|设计|计思|思路|路是|是怎|怎样|样的|的?|?| -
如何实现网上考试?
【编程10000问】login.asp' 考生验证.<%@ Language=VBScript%><%name=trim(request("name"))passwd=trim(request("passwd"))if name<>"" and passwd<>"" then' 检查考生是否输入用户名和密码.Set conn = Server.CreateObject("ADODB.Connection")conn.Open "driver={Microsoft Acces...
|如何|何实|实现|现网|网上|上考|考试|试?|?|