搜索列表
-
如何刪除客户端的Cookies？
【编程10000问】<%@ Language=VBScript %><%Option Explicitresponse.buffer=trueDim objCookieResponse.Write "春风精彩之不可告人删除CookieS<BR>"For Each objCookie In Request.CookiesResponse.Cookies(objCookie).Expires = "1，1，2001"' 设置时间删除.NextResponse.Write "恭喜,删...
|如何|何刪|刪除|除客|客户|户端|端的|的C|Co|oo|ok|ki|ie|es|s？|？| -
如何提示用户打开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加|加密|密页|页面|面？|？| -
怎样给文件加密最安全？
【编程10000问】<%@ Language = VBScript%><%Response.Expires = 0p = "abcdefg"Set TestPWD = New CPassWordTestPWD.EnPWD pTestPWD.UnPWD TestPWD.ShowPWD(True)k = TestPWD.ShowPWD(True)l = TestPWD.ShowPWD(False)Set TestPWD = NothingWith Resp...
|怎样|样给|给文|文件|件加|加密|密最|最安|安全|全？|？| -
如何制作关联的下拉菜单？
【编程10000问】<form name=f1 METHOD="POST"><%OpenDB objConn, "xxxx"Set RSClass = objConn.Execute("select * from class Order by fldClass")If RSClass.EOF Then Response.Write "噢,没有记录!<BR>"ElseResponse.Write "<select NAME=""class"" style=""FONT-S...
|如何|何制|制作|作关|关联|联的|的下|下拉|拉菜|菜单|单？|？| -
如何在读取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问】Sub DoDropDown(Arr(), strSelName, onchange, strSelected, strexclude)Dim i if strSelected <> "" then swap arr, strSelected end if response.write "<select NAME...
|如何|何使|使用|用数|数组|组来|来显|显示|示下|下拉|拉菜|菜单|单？|？| -
如何利用数据库内容建立一个下拉式列表？
【编程10000问】如何利用数据库内容建立一个下拉式列表？<% myDSN="DSN=xur;uid=xur;pwd=xur"mySQL="select * from authors where AU_ID<100"set conntemp=server.createobject("adodb.connection")conntemp.open myDSNset rstemp=conntemp.execute(mySQL)if rstemp.eof thenresponse.write "噢,数据库...
|如何|何利|利用|用数|数据|据库|库内|内容|容建|建立|立一|一个|个下|下拉|拉式|式列|列表|表？|？| -
如何制作一个弹出式的调查窗口？
【编程10000问】 <% Dim bSurvey ' 是否显示调查表 const bID="1" ' 调查表的id bSurvey=false ' 检查调查表是否已经显示过. if instr(request.Cookies("s"),":" & bID & ":")=0 then ' 如果...
|如何|何制|制作|作一|一个|个弹|弹出|出式|式的|的调|调查|查窗|窗口|口？|？| -
如何控制弹出一个NTLM验证窗口？
【编程10000问】如何控制弹出一个NTLM验证窗口？<% Response.Status = "401 Unauthorized" Response.Addheader "WWW-Authenticate","NTLM" response.write "user=" & Request.ServerVariables("LOGON_USER") & "<br>" response.write "用户登录" response.end %>
|如何|何控|控制|制弹|弹出|出一|一个|个N|NT|TL|LM|M验|验证|证窗|窗口|口？|？|
