asp+ajax检测用户名是否可用的代码

作者:xiayuesong 日期:2008-06-15

Asp+Ajax边输入边显示查询结果(文本框输入提示)

作者:xiayuesong 日期:2008-06-13

ASP让url的汉字显示为编码

作者:xiayuesong 日期:2009-05-13

asp解码url
<a href="1.asp?action=<%=server.urlencode("你好")%>">asdf</a>

<%
Function URLDecode(enStr)
dim deStr,strSpecial
dim c,i,v
deStr=""
strSpecial="!""#$%&'()*+,.-_/:;<=>?@[\]^`{|}~%"
for i=1 to len(enStr)
c=Mid(enStr,i,1)
if c="%" then
    v=eval("&h"+Mid(enStr,i+1,2))
    if inStr(strSpecial,chr(v))>0 then
     deStr=deStr&chr(v)
     i=i+2
    else
     v=eval("&h"+ Mid(enStr,i+1,2) + Mid(enStr,i+4,2))
     deStr=deStr & chr(v)
     i=i+5
      end if
else
    if c="+" then
     deStr=deStr&" "
    else
     deStr=deStr&c
    end if
end if
next
URLDecode=deStr
End function

response.Write URLDecode(request.QueryString("action"))
%>

Tags: asp汉字显示为编码 asp汉字显示为编码 asp网址汉字显示为编码 asp网址汉字显示为编码 ASP ASP server.UrlDecode server.UrlDecode asp的 asp的 server.UrlDecode server.UrlDecode

分类:ASP | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 367

ASP操作XML文件的完整实例

作者:xiayuesong 日期:2009-05-12

<%
'----------------------------------------------------------------
'程序简介: 完成asp语言对XML文档中指定节点文本的增加、删除、修改、查看
'入口参数: 无
'出口参数: 无
'------------------------------------------------
'函数名字：ConnectXml()
'入口参数: filename 需要连接或打开的xml文件名
'出口参数: 无
'返回值：ConnectXml=0，XMLMorntekDocument就是一个成功装载XML文档的对象了。
' ConnectXml<>0,则打印错误信息strError
'------------------------------------------------
dim XMLMorntekDocument

function ConnectXml(filename)
dim strSourceFile
strSourceFile = Server.MapPath(filename)
Set XMLMorntekDocument = Server.CreateObject(" Microsoft.XMLDOM")
XMLMorntekDocument.async = false
XMLMorntekDocument.load(strSourceFile)
ConnectXml=XMLMorntekDocument.parseerror.errorcode
if XMLMorntekDocument.parseerror.errorcode<>0 then
strError="<h2>error"&XMLMorntekDocument.parseerror.errorcode&"</h2>"
strError=strError&XMLMorntekDocument.parseerror.reason&"<br>"
strError=strError&XMLMorntekDocument.parseerror.url&"<br>"
strError=strError&XMLMorntekDocument.parseerror.line&"<br>"
strError=strError&XMLMorntekDocument.parseerror.filepos&"<br>"
strError=strError&XMLMorntekDocument.parseerror.srcText&"<br>"
response.write strError
end if
end function

Tags: ASP ASP XML XML

分类:ASP | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 314

ASP操作數據庫的類

作者:xiayuesong 日期:2009-05-06

對於ASP的使用者來說，在數據庫操作上越簡單，就有更多的時間去考慮邏輯上和應用上的代碼，效率也會更高。今天俺在這裡給大家提供一種數據庫操作的思路，這些代碼是俺在長期的ASP應用中不斷完成和修正的，也已經用它完成了很多項目了，應該說直接拿去用是沒有問題的。當然本人能力也有限，希望大家一起來討論。

說明：此帖代碼均是VBScript版本。另外最好你對手寫ASP已經有一定的基礎。

先簡單介紹一下俺這個類的一些特點：

可同時操作多個不同類型的數據庫。
完全不用考慮數據類型的差別，再也不用想字符型字段加不加單引號。
調用非常簡單，對數據庫的主要操作一般只需要一行代碼。
支持mssql事務回滾。
可自動生成和輸出sql語句方便調試。
使用方法：

分类:ASP | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 342

从IIS的ASP迁移到APACHE的PHP的方法

作者:xiayuesong 日期:2009-04-30

目前在网站服务器软件市场中，开放源码的Apache服务器占据了60%的市场份额，而微软免费捆绑在操作系统当中的IIS排名第二，其市场份额为31%，从总体上看，目前的网站服务器软件市场已经被Apache和IIS瓜分。

一般从性能上通常都认同Apache的性能优于IIS，虽然IIS的操作管理界面非常简单易用，但是从IIS平台迁移到Apache平台依然是大势所趋，今天我就介绍几种从IIS的ASP转换到Apache的PHP的方法。

通过插件模拟运行ASP

通过一些公司的产品，直接让IIS的ASP代码正常运行于Apache环境，目前主要的产品有：

Apache::ASP http://www.apache-asp.org/

SUN ONE ASP http://www.sun.com/software/chilisoft/

iASP http://www.instantasp.co.uk/

通过程序转换ASP到PHP

ASP和PHP都是很易用的网页脚本语言，目前有一些第三方程序可以将ASP转换到PHP，例如免费的asp2php。

asp2php 是一个把 ASP 转成 PHP 的转换程序，类似的转换程序还有Chilisoft、InstantASP 与 Free ASP，目前 asp2php 可以转换大部分的ASP程序，不过，转换过程中有一些Bug，需要手动进行源代码的调整。

Tags: IIS IIS ASP ASP APACHE APACHE PHP PHP

分类:Server | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 417

用ASP创建日志文件（附源程序）

作者:xiayuesong 日期:2008-12-14

你是否有时想知道什么人访问你的站点，什么时间，IP地址等。下面我就这个问题向
大家来阐述一下。这个例子使用文本文件来写入用户的信息创建一个logfile.asp放
在每一个asp的页面的顶端当有人来访问你
的站点logfile.asp自动把他的信息写入LogFile.txt,如果相关的URl一样的话则不
写入文件
File: LogFile.asp

<%
Dim ValidEntry ' Log variable
' First set that this log is valid
ValidEntry = True

' If Session Variable "LogIn" is not empty
' that mean this person has already been logged
' then set ValidLog to False
If not IsEmpty(Session("LogIn")) then ValidEntry = False

Tags: ASP ASP 日志文件日志文件源程序源程序

分类:ASP | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 582

改进的ASP备份SQL Server数据库

作者:xiayuesong 日期:2008-12-10

<form method="post" name="myform" action="?action=backupdatabase">
选择操作：<INPUT TYPE="radio" NAME="act" id="act_backup"value="backup"><label for=act_backup>备份</label>
<INPUT TYPE="radio" NAME="act" id="act_restore" value="restore"><label for=act_restore>恢复</label>
<br>数据库名：<INPUT TYPE="text" NAME="databasename" value="<%=request("databasename")%>">
<br>文件路径：<INPUT TYPE="text" NAME="bak_file" value="c:\$1.bak">(备份或恢复的文件路径)<br>
<input type="submit" value="确定" id=submit1 name=submit1>
</form>