搜索列表
-
如何把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...
|如何|何实|实现|现网|网上|上考|考试|试？|？| -
ASP动态生成的javascript表单验证代码
【ASP编程】以网上down了一个ASP动态生成Form验证javascript的代码，自己扩容了一下。作者的大名我给忘了，不过我记得清楚，从第一条至第九条的代码都是该作者的原创。至于九至第十五条却是本人自己加的哦。而且由于本人水平有限，从第九条至第十五条不见得会条条生效啊？呵呵，其实把它贴在这里没有什么必要的，因为这点小会伎俩谁都...
ASP动态生成的javascript表单验证代码 -
如何使用表单发送电子邮件？
【编程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 ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确？|？| -
如何判断用户是否非正常离开聊天室？
【编程10000问】如何判断用户是否非正常离开聊天室？ total = application("AllPeople")' 聊天总人数. aryHuman = split(total,";") for i = lbound(aryHuman) to ubound(aryHuman) - 1 if application("user" & i) = "online" then if int(timer)...
|如何|何判|判断|断用|用户|户是|是否|否非|非正|正常|常离|离开|开聊|聊天|天室|室？|？| -
如何判断发言是否为空？
【编程10000问】if len(usersays)<>0 then session("whoto")=request.form("whoto") session("action")=request.form("action") if instr(usersays,chr(39))>0 then usersays=replace(usersays,chr(39),"\"&chr(39)) end if if instr(usersays,chr(34))>0 then us...
|如何|何判|判断|断发|发言|言是|是否|否为|为空|空？|？| -
如何编写一个最简单的聊天程序？
【编程10000问】chat.html <html> <head><title>精彩春风之简单聊天</title></head> <frameset rows="*,100"> <frame src="chatopinions.asp"> <frame src="chatform.asp"> </frameset> </html> chatopinions.asp<html> <...
|如何|何编|编写|写一|一个|个最|最简|简单|单的|的聊|聊天|天程|程序|序？|？| -
如何制作K线图？
【编程10000问】<%@ Language=VBScript %><%Response.Buffer=trueResponse.Expires = 0Response.ExpiresAbsolute = now() - 1Response.Addheader "cache-control","private"Response.Addheader "pragma","no-cache"%><!DOCTYPE html PUBLIC "-//W3C//Dtd html 4.0 Transitional//...
|如何|何制|制作|作K|K线|线图|图？|？|
