易截截图软件、单文件、免安装、纯绿色、仅160KB

asp获取URL的方法

方法一:简单,得不到参数,只有一个虚拟路径
GetUrl =request("url")
例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
获取为:shiyan.asp
方法二:得到整个URL,得到参数
'得到当前页面的地址    
Function   GetUrl()    
On   Error   Resume   Next    
Dim   strTemp    
If   LCase(Request.ServerVariables("HTTPS"))   =   "off"   Then    
strTemp   =   "http://"    
Else    
strTemp   =   "https://"    
End   If    
strTemp   =   strTemp   &   Request.ServerVariables("SERVER_NAME")    
If   Request.ServerVariables("SERVER_PORT")   <>   80   Then   strTemp   =   strTemp   &   ":"   &   Request.ServerVariables("SERVER_PORT")    
strTemp   =   strTemp   &   Request.ServerVariables("URL")    
If   Trim(Request.QueryString)   <>   ""   Then   strTemp   =   strTemp   &   "?"   &   Trim(Request.QueryString)    
GetUrl   =   strTemp    
End   Function    
例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
获取为:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
方法二:得到虚拟路径,得到参数
Private Function GetUrl()
Dim ScriptAddress,M_ItemUrl,M_item
ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME")) '取得当前地址


相关文档:

asp上传类2

 1.html代码  formname是表单name,editname是文件域name,uppath是上传文件保存路径.
<input name="qtxx" type="text" id="qtxx" size="50" />
 
<input type="button" name="Submit22" value="上传图片" onClick="window.open('upload.asp?formname=from1&editname=qtxx&uppath ......

asp ajax新闻评论

Ajax.js
// AJAX类
function AJAXRequest() {
var xmlObj = false;
var CBfunc,ObjSelf;
ObjSelf=this;
try { xmlObj=new XMLHttpRequest; }
catch(e) {
try { xmlObj=new ActiveXObject("MSXML2.XMLHTTP"); }
catch(e2) {
try { xmlObj=new ActiveXObject("Microsoft.XMLHTTP"); }
catch(e3) { ......

自己收集的各种ASP的验证码

由于项目的需要去Google搜了一下 ,还真多
记得“想当年”某天上午在这里路过,看到一位朋友贴的自己写的验证码程序,虽然他的程序是黑白有杂点,但其实很容易被破解的,但却有不少人喜欢着。。。没办法,当天下午研究了一翻 BMP 图片,然后就写出了这些代码,只是当初没有公布,眼看今天这么多坏人乱在很多论坛 ......

浅说asp的一些特点,呵呵

到底使用PHP,ASP,或其它哪种技术时,可能选择PHP 会很酷,但是如果你对Unix系统,以及Perl 或C 等知之甚少的话,这就不是一个明知的选择。ASP 可以用VBScript 进行编写,而VBScript 本身是MICROSOFT Visual Basic 产品的简化版本,它采用与Visual Basic 近似的语法框架,简单易学。考虑到Visual Basic 的普及性,那么你还 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号