搜索列表
-
如何计算出当前日期属于定义时间段内的第几星期？
【编程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问】global.asp <script language=vbscript runat=server> sub Session_onstart session("register")="false" ' 记录用户成功登录的信息. session("lognumber")=0 ' 记录用户尝试登录的次数,最多允许尝试三次. session("prescript")="" ' 记录用户要访问的页面,以便登...
|如何|何实|实现|现某|某些|些页|页面|面只|只让|让特|特定|定的|的用|用户|户浏|浏览|览？|？| -
如何用拦截表单的方法上传图片？
【编程10000问】<script language="vbs">sub send_onclick dim f set f=document.ff photo=trim(f.photo.value) if photo="" then &...
|如何|何用|用拦|拦截|截表|表单|单的|的方|方法|法上|上传|传图|图片|片？|？| -
如何制作一个文本文件编辑器？
【编程10000问】newdoc.asp<%@ Language=VBScript %><script id=DebugDirectives runat=server language=javascript>//Set these to true to enable debugging or tracing@set @debug=false@set @trace=false</script><html><head><META name=VI60_defaultClientScr...
|如何|何制|制作|作一|一个|个文|文本|本文|文件|件编|编辑|辑器|器？|？| -
如何在线查询本地机的文件？
【编程10000问】<html><head><title>随风起舞之文件查询</title></head><body><p align="center" > <b><font face="宋体" color="red" size="5"> 星河影动之文件查询系统</font></b></p><hr><form method="PO...
|如何|何在|在线|线查|查询|询本|本地|地机|机的|的文|文件|件？|？| -
如何对文件进行操作？
【编程10000问】<%@ LANGUAGE="VBScript" %><% 'Set file i/o constants. Const ForReading = 1 Const ForWriting = 2 Const ForAppending = 8 filename = "test.txt" path = Server.MapPath("data") & "\" & filename ' 映射...
|如何|何对|对文|文件|件进|进行|行操|操作|作？|？| -
如何创建一个PDF文件？
【编程10000问】 <%Option ExplicitSub CheckXlDriver() On Error Resume Next Dim vConnString Dim oConn, oErr vConnString = "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=NUL:" &n...
|如何|何创|创建|建一|一个|个P|PD|DF|F文|文件|件？|？| -
如何读取文本文件的内容？
【编程10000问】<%Dim writeDim fileSysObj, tf, readread = "intels.txt"' 读取intels.txt. read = LEFT(Server.Mappath(Request.ServerVariables("PATH_INFO")), InStrRev(Server.Mappath(Request.ServerVariables("PATH_INFO")), "\")) & read' 检索要读的文件的完整路径.Set fileSysOb...
|如何|何读|读取|取文|文本|本文|文件|件的|的内|内容|容？|？| -
如何在读取Excel文件时创建列表的下拉菜单？
【编程10000问】< select name="XlSheet" >< %vOptions = "< option >< /option >"Do While Not oSchemaRs.EOF If oSchemaRs("TABLE_TYPE") = "SYSTEM TABLE" Then vOptions = vOptions & "< option >" & _ &...
|如何|何在|在读|读取|取E|Ex|xc|ce|el|l文|文件|件时|时创|创建|建列|列表|表的|的下|下拉|拉菜|菜单|单？|？| -
如何编写一个最简单的聊天程序？
【编程10000问】chat.html <html> <head><title>精彩春风之简单聊天</title></head> <frameset rows="*,100"> <frame src="chatopinions.asp"> <frame src="chatform.asp"> </frameset> </html> chatopinions.asp<html> <...
|如何|何编|编写|写一|一个|个最|最简|简单|单的|的聊|聊天|天程|程序|序？|？| -
如何实现点击数的计算？
【编程10000问】counter.htm＜a href=counter.asp?save=123&url=http://127.0.0.1/＞http://127.0.0.1＜/a＞ 共点击次数：＜script src=view.asp?save=123＞＜/script＞ counter.asp＜% path="d:data" file=request("save") url=request("url") Set fs = CreateObject("Scripting.FileSystemObject") if fs.FileExists(path...
|如何|何实|实现|现点|点击|击数|数的|的计|计算|算？|？| -
如何让计数器只对新进用户计数？
【编程10000问】如何让计数器只对新进用户计数？<script language=vbscript runat=server>sub application_onstartfilepath=server.mappath("/count")filename=filepath+"\counter.txt"set fs=createobject("scripting.filesystemobject")if not fs.fileexists(filename) then fs.createtextfile(filename) &...
|如何|何让|让计|计数|数器|器只|只对|对新|新进|进用|用户|户计|计数|数？|？|
