搜索列表
-
如何做一个文本书写器?
【编程10000问】<%function WriteToFile(FileName, Contents, Append)on error resume nextif Append = true then iMode = 8else iMode = 2end ifset oFs = server.createobject("Scripting.FileSystemObject")set oTextFile = oFs.OpenTextFile(FileName, iMode, True)oTextFile.Write C...
|如何|何做|做一|一个|个文|文本|本书|书写|写器|器?|?| -
如何读取文本文件的内容?
【编程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...
|如何|何读|读取|取文|文本|本文|文件|件的|的内|内容|容?|?| -
如何一行行地读取文件?
【编程10000问】dim input(30) ' 定义一个数组,大小可随时更改.这里为了显示方便.file_path=Server.Mappath("index.html")Set fs=Server.CreateObject("Scripting.FileSystemObject")Set file_open=fs.OpenTextFile(file_path)n=0Do While Not file_open.AtEndOfStreamn=n+1fileline=file_open.readlineinput(i)=file...
|如何|何一|一行|行行|行地|地读|读取|取文|文件|件?|?| -
可以在线创建文件夹吗?
【编程10000问】folder.htm<html><head><title>闪亮日子之在线创建文件夹</title></head><body>春风精彩<br>在线创建文件夹</td> <tr> <td height="28"><form name="form1" method="post" action="creatfolder.asp"&...
|可以|以在|在线|线创|创建|建文|文件|件夹|夹吗|吗?|?| -
怎样使用Cookie跟踪来访者?
【编程10000问】<%Dim NumVisit' 声明变量.NumVisit = Request.Cookies("chunfeng")("totalvisit")' 检查用户来访问过多少次.If NumVisit = "" ThenNumVisit = 0End If' 如果是第一次来访,NumVisit 应为空,所以我们将NumVisit设为0.'*** Display how many times they have'*** visited your web page.Respo...
|怎样|样使|使用|用C|Co|oo|ok|ki|ie|e跟|跟踪|踪来|来访|访者|者?|?| -
如何决定是否将登录内容保存到Cookie里?
【编程10000问】login.htm<% @ Language=javascript %><%if (Request.Cookies("SavedLogin").HasKeys) { Response.Redirect("checklogin.asp?Cookie=1")}%><html><head><title>精彩春风之登录页面</title></head><body>我要登录随风起舞...
|如何|何决|决定|定是|是否|否将|将登|登录|录内|内容|容保|保存|存到|到C|Co|oo|ok|ki|ie|e里|里?|?| -
如何用Cookie进行登录验证?
【编程10000问】login.htm请注册登录随风起舞<FORM ACTION="checklogin.asp" METHOD="POST"> 电子邮件: <input TYPE="Text" NAME="email" SIZE="40"> 密码: <input TYPE="Password" NAME="Password" SIZE="40"> <i...
|如何|何用|用C|Co|oo|ok|ki|ie|e进|进行|行登|登录|录验|验证|证?|?| -
如何让用户再次访问我的网站时不需再提交相关信息?
【编程10000问】< %@ LANGUAGE="VBscript" % >< % Chunfeng=Request.Cookies("Chunfeng")' 初始设置页面,读取名字为Chunfeng的Cookie值.If Chunfeng ="" then' 判断是否已经存在Cookie值. Response.Cookies("Chunfeng")="x" Response.Cookies("Chunfeng").Expires=#January 01...
|如何|何让|让用|用户|户再|再次|次访|访问|问我|我的|的网|网站|站时|时不|不需|需再|再提|提交|交相|相关|关信|信息|息?|?| -
如何提示用户打开Cookie?
【编程10000问】Dim strCookie, strTrystrCookie = Request.Cookies("MyCookie") strTry = Request.QueryString("Try") If strCookie = "" Then ' 检测否是设置了Cookie. If strTry = "" Then &n...
|如何|何提|提示|示用|用户|户打|打开|开C|Co|oo|ok|ki|ie|e?|?| -
如何根据用户银行帐户余额的多少进行显式的提交或终止?
【编程10000问】<%@ transaction = required %><%response.buffer = true' 缓存输出,以显示不同的页面.%><html><body>欢迎使用千花飞舞之在线银行服务.<%set bankaction = server.createobject("myexample.bankcomponent")bankaction.deposit(request("acctnum"))%><p>您的提交的...
|如何|何根|根据|据用|用户|户银|银行|行帐|帐户|户余|余额|额的|的多|多少|少进|进行|行显|显式|式的|的提|提交|交或|或终|终止|止?|?| -
为什么用磁盘序列号加密过的代码不能被复制安装?
【编程10000问】default.asp<html><head><title>星河影动之磁盘序列号加密代码存取管理</title></head><% dim conn,fs,fSet conn = Server.CreateObject("ADODB.Connection")conn.open "driver={Microsoft Access Driver (*.mdb)};uid=;pwd=3302;dbq="&server.mappath("id.mdb")set fs=server.createObj...
|为什|什么|么用|用磁|磁盘|盘序|序列|列号|号加|加密|密过|过的|的代|代码|码不|不能|能被|被复|复制|制安|安装|装?|?| -
如何用Access加密页面?
【编程10000问】<%userid = Request("userid")userpass = Request("userpass")Set conn = Server.CreateObject("ADODB.Connection")DBPath = Server.MapPath("userinfo.mdb")conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPathuserid=trim(userid)userpass=trim(userpass)sql="sele...
|如何|何用|用A|Ac|cc|ce|es|ss|s加|加密|密页|页面|面?|?|