搜索列表
-
如何判断URL格式是否符合规范？
【编程10000问】<% function checkisUrl(tmpString) dim c,i checkisUrl = true tmpString=Lcase(trim(tmpString)) if left(tmpString,7)<>"http://" then tmpString="http://"&tmpString &n...
|如何|何判|判断|断U|UR|RL|L格|格式|式是|是否|否符|符合|合规|规范|范？|？| -
如何计算下载一个文件需要多长时间？
【编程10000问】<%Function DownloadTime(intFileSize, strModemType)Dim TimeInSeconds, ModemSpeed, strDownloadTime, AppendStringDim intYears, intWeeks, intDaysDim intHours, intMinutes, intSecondsintYears = 0intWeeks = 0intDays = 0intHours = 0intMinutes = 0intSeconds = 0strDow...
|如何|何计|计算|算下|下载|载一|一个|个文|文件|件需|需要|要多|多长|长时|时间|间？|？| -
如何计算ASP页面的载入时间？
【编程10000问】<%Dim varInitial_TimevarInitial_Time = TimerResponse.Write "Initial_Time =[" & varInitial_Time & "]<br>"%> <% For I = 1 to 10 Response.write "随风起舞(www.intels.net)时尚咨询的个人网站欢迎您!" & I & "<br>"Next%> <...
|如何|何计|计算|算A|AS|SP|P页|页面|面的|的载|载入|入时|时间|间？|？| -
如何编写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问】<% If Err.Number <> 0 Then ' 错误处理. Response.Clear ' 清除缓冲区. Select Case Err.Number ' 根据不同错误分处理. &nbs...
|可以|以让|让程|程序|序告|告诉|诉我|我详|详细|细的|的页|页面|面错|错误|误和|和数|数据|据库|库连|连接|接错|错误|误吗|吗？|？| -
网上考试设计思路是怎样的？
【编程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...
|如何|何实|实现|现网|网上|上考|考试|试？|？| -
如何使用表单发送电子邮件？
【编程10000问】如何使用表单发送电子邮件？formToEmail.htm' 表单.<FORM METHOD="POST" ACTION="formToEmail.asp"> <P> 收件人: <INPUT SIZE=30 NAME="recipient" MAXLENGTH=200> <P> 发件人: <INPUT SIZE=30 NAME="sender" MAXLENG...
|如何|何使|使用|用表|表单|单发|发送|送电|电子|子邮|邮件|件？|？| -
如何用变量实现群聊和悄悄话？
【编程10000问】如何用变量实现群聊和悄悄话？<%if Request.Form("xt")="on" then ' 判断是否悄悄话.Application.Lock' 是悄悄话,继续往下处理.application(session("username"))=temppos&application(session("username"))' 只有发言人和发言对象才能看到此发言,实现悄悄话. application(Request.f...
|如何|何用|用变|变量|量实|实现|现群|群聊|聊和|和悄|悄悄|悄话|话？|？| -
如何判断电子邮件的地址格式是否正确？
【编程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 ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确？|？|
