编程10000问
编程10000问是经典的电脑知识学习网站，汇聚了asp、asp.net、java、php、jsp、linux、ajax、mysql、mssql、oracle、flash、正则表达式、美图秀秀、网页特效、jquery、dedecms等各种类别技术经验知识，是最全面的网上电脑脚本编程知识库。
-
如何制作一个弹出式的调查窗口？
【编程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验|验证|证窗|窗口|口？|？| -
如何让一个方框栏内的文字滚动显示？
【编程10000问】如何让一个方框栏内的文字滚动显示？<!-- #include file="news.inc" --><%dim NewsStr(1,5)NewsStr(0,0)="下载本栏链接" NewsStr(1,0)="http://www.intels.net/" NewsStr(0,1)="中国水利水电出版社"NewsStr(1,1)="http://www.waterpub.com.cn/" NewsStr(0,2)= "随风起舞"...
|如何|何让|让一|一个|个方|方框|框栏|栏内|内的|的文|文字|字滚|滚动|动显|显示|示？|？| -
如何做一个检索结果带链接的检索？
【编程10000问】如何做一个检索结果带链接的检索？<% data=request.form("search_data") ' 从FORM变量集得到要查询的文件名称所要包含的字符串 p=search_folder(data,"http://jack/cgi-bin","c:\intels\wwwroot\cgi-bin") ' 调用函数查询目标查询目录下的所有子目录(所有子树),方法:search_folder(要查询的字符串,查询目标的虚拟绝...
|如何|何做|做一|一个|个检|检索|索结|结果|果带|带链|链接|接的|的检|检索|索？|？| -
如何终止浏览器的Cahce页面？
【编程10000问】如何终止浏览器的Cahce页面？ Function Redirect( NewURL ) If Not IsEmpty( NewURL & "" ) ThenDim QuestionMark QuestionMark = Instr( NewURL, "?" )If QuestionMark = 0 ThenResponse.Redirect NewURL & "?" & NoCacheURL()Response.End ElseRespo...
|如何|何终|终止|止浏|浏览|览器|器的|的C|Ca|ah|hc|ce|e页|页面|面？|？| -
如何实现非大小写的替换？
【编程10000问】如何实现非大小写的替换？Function ReplaceNoIgnoreCase(str,replStr) If len(replStr)<1 or str="" Then ReplaceTest=str Exit function End If ...
|如何|何实|实现|现非|非大|大小|小写|写的|的替|替换|换？|？| -
如何编写一个加法器？
【编程10000问】如何编写一个加法器？<form action="./calculation.asp"><input type="text" size="1" name="op1 value=<%Response.Write Request("op1")%>><input type="submit" name="operation value="plus"><input type="text" size="1" name="op2 value=<%Response.Write Request(...
|如何|何编|编写|写一|一个|个加|加法|法器|器？|？| -
如何编写一个创建FTP站点的函数？
【编程10000问】如何编写一个创建FTP站点的函数？Function ASTCreateFtpSite(IPAddress, RootDirectory, ServerComment, HostName, PortNum, Computer, Start,LogFileDirectory) Dim MSFTPSVC, FtpServer, ...
|如何|何编|编写|写一|一个|个创|创建|建F|FT|TP|P站|站点|点的|的函|函数|数？|？| -
如何编写一个过滤掉HTML代码的函数？
【编程10000问】如何编写一个过滤掉HTML代码的函数？<%Function Filterhtml(strToFilter) Dim strTemp strTemp = strToFilter While Instr(1,strTemp,"<") AND Instr(1, strTemp, ">") strTemp = Left(strTemp, Instr(1, strTemp, "<")-1) & Rig...
|如何|何编|编写|写一|一个|个过|过滤|滤掉|掉H|HT|TM|ML|L代|代码|码的|的函|函数|数？|？| -
如何实现歌曲在线点播？
【编程10000问】<%dim choose,path,mydb,myset,SQL,fs,mp3' 获得用户提交表单(list.htm)选中的曲目对应的id号,并将其赋给字串变量choose. choose=“("for i=3 to request.form.countchoose=choose＋request.form(i)＋“,"nextchoose=left(choose,len(choose)－1)＋“)"if choose=“()" thenresponse.redirect(“list.htm")resp...
|如何|何实|实现|现歌|歌曲|曲在|在线|线点|点播|播？|？| -
如何做一个只搜索本网站的引擎？
【编程10000问】searchfiles.html <html><head><title>撼雪喷云之本网搜索引擎</title></head><body><form method="POST" action="cgi-bin/searchfiles.asp"> <table border="0" cellpadding="5" bgcolor="#C2E7E3"> <tr&...
|如何|何做|做一|一个|个只|只搜|搜索|索本|本网|网站|站的|的引|引擎|擎？|？| -
如何做一个文本搜索？
【编程10000问】<%head = "搜索"SearchString = Request("SearchString")count=0Function UnMapPath( Path ) UnMapPath = Replace(Mid(Path, Len(Server.MapPath("/")) + 1), "\", "/")' 把当前目录的实际路径转换为虚拟路径.End FunctionFunction SearchFile( f, s, title ) Set fo = f...
|如何|何做|做一|一个|个文|文本|本搜|搜索|索？|？|
