搜索列表
-
本站用的rss输出
【XML/RSS】用了getrows提高效率复制代码 代码如下:<% Response.Charset = "GB2312" Response.ContentType="text/xml" Response.Expires=60 Response.Write("<?xml version=""1.0"" encoding=""GB2312""?>") response.write("<?xml-stylesheet type=""text/css"" ...
本站用的rss输出 -
会移动的文字(Marquee)
【CSS/HTML】Marquee标记用于在可用浏览区域中滚动文本。这个标记只适用于IE3以后的版的浏览器。 格式: <MARQUEE ALIGN="…" BEHAVIOR="…" BGCOLOR="…" DIRECTION="…" HEIGHT="…" WIDTH="…" HSP...
会移动的文字(Marquee) -
如何验证日期输入是否正确?
【编程10000问】<%Option ExplicitDim strDate ' 记录输入的日期,字符型.Dim datDate ' 测试输入的日期是否正确,日期型.<html>%><head><title>千花飞舞之日期验证</title><meta http...
|如何|何验|验证|证日|日期|期输|输入|入是|是否|否正|正确|确?|?| -
如何计算出当前日期属于定义时间段内的第几星期?
【编程10000问】如何计算出当前日期属于定义时间段内的第几星期?Function CalculateWeekNo(BeginDate,EndDate,InputDate)dim wdate(500,8)z=0x=0strlong=len(CStr(inputdate))-9inputdate=cdate(left(CStr(inputdate),strlong))for i=cdate(BeginDate) to cdate(EndDate) if inputdate=i then &nbs...
|如何|何计|计算|算出|出当|当前|前日|日期|期属|属于|于定|定义|义时|时间|间段|段内|内的|的第|第几|几星|星期|期?|?| -
如何在线更改密码?
【编程10000问】<%id = Request("id")newpassword = Request("password")newpasswordtemp = Request("passwordtemp") If newpassword <> newpasswordtemp ThenResponse.Write "<center>对不起,新密码与新密码确认不同.请重试!</center>"Response.EndEnd IfSet conn = Server.Crea...
|如何|何在|在线|线更|更改|改密|密码|码?|?| -
如何让用户也能修改密码?
【编程10000问】<%id = Request("id")newpassword = Request("password")newpasswordtemp = Request("passwordtemp")If newpassword <> newpasswordtemp ThenResponse.Write "<center>对不起,密码未能确认,请重新输入!</center>"Response.EndEnd If Set conn = Server.CreateObj...
|如何|何让|让用|用户|户也|也能|能修|修改|改密|密码|码?|?| -
如何最大限度地实现安全登录功能?
【编程10000问】<%if not IsEmpty(Session("cust—id")) and Len(Session("cust—id"))>0 then' 用户登录后指向主页. Response.Redirect("navigation/dashbrd.asp") ' 在此添入真正的主页URL.end ifbLogin = False ' 设置标志. bError = Falseif IsEmpty(Request("uid")) or Len(Request("uid")) = 0 or IsE...
|如何|何最|最大|大限|限度|度地|地实|实现|现安|安全|全登|登录|录功|功能|能?|?| -
如何对用户进行授权?
【编程10000问】authenticate.asp<%Dim URLURL = Request.QueryString' 获得URL. %> <html><body><FORM METHOD=POST ACTION="/validate.asp"> <INPUT TYPE=HIDDEN NAME="URL" VALUE="<%=URL%>"> ' 将URL保...
|如何|何对|对用|用户|户进|进行|行授|授权|权?|?| -
如何实现文件上传并自动归类功能?
【编程10000问】upload.asp <form action=http://<%= Request. ServerVariables(SERVER_NAME)>/wdread.asp method=post> <p>主题: <input type=text name=subject><br> 作者:<input name=author type=text><br> ...
|如何|何实|实现|现文|文件|件上|上传|传并|并自|自动|动归|归类|类功|功能|能?|?| -
如何获知文件最后的修改日期和时间?
【编程10000问】<%Dim objCMFUDim strModifiedSet objCMFU = Server.CreateObject("CM_FileUtils.GetProperty")' 创建对象并赋给变量,并且GetProperty类是当前唯一可用的.strModified = objCMFU.LastModified' 检索并返回包含最后修改日期和时间(LastModified function )值.当然了,还要考虑到出错的...
|如何|何获|获知|知文|文件|件最|最后|后的|的修|修改|改日|日期|期和|和时|时间|间?|?| -
如何获知文件被改动的情况?
【编程10000问】Function File_GetLastModified( sFile )Dim objFileObj, objFile Set objFileObj = CreateObject("Scripting.FileSystemObject") If sFile = "" Then sFile = Server.MapPath( Request.ServerVariables("script_NAME") ) End If Set objFile ...
|如何|何获|获知|知文|文件|件被|被改|改动|动的|的情|情况|况?|?| -
如何通过表单创建一个Word?
【编程10000问】docform.htm<form action="doccreate.asp">姓名: <input type="text" name="Name" size="50" maxlength="100">电子邮件: <input type="text" name="Email" size="50" maxlength="100"><p>内容:<textarea cols="50" rows="10" name="comments"></textarea><...
|如何|何通|通过|过表|表单|单创|创建|建一|一个|个W|Wo|or|rd|d?|?|