指定一段GB2312编码中文汉字转换成UTF-8编码的ASP函数代码
作者:随然 日期:2009-06-02
在制作网页的时候，偶尔会出现编码交叉的情况。一段GB2312编码的汉字在UTF-8页面中可能会出现乱码，所以这个时候需要把这段文字转换编码，下面提供转换编码的ASP函数代码供大家参考。
复制内容到剪贴板
程序代码
程序代码'汉字GB2312编码转换成UTF-8编码
function chinese2unicode(Salon)
dim i
dim Salon_one
dim Salon_unicode
for i=1 to len(Salon)
Salon_one=Mid(Salon,i,1)
Salon_unicode=Salon_unicode&chr(38)
Salon_unicode=Salon_unicode&chr(35)
Salon_unicode=Salon_unicode&chr(120)
function chinese2unicode(Salon)
dim i
dim Salon_one
dim Salon_unicode
for i=1 to len(Salon)
Salon_one=Mid(Salon,i,1)
Salon_unicode=Salon_unicode&chr(38)
Salon_unicode=Salon_unicode&chr(35)
Salon_unicode=Salon_unicode&chr(120)
ASP.NET 您试图在此 Web 服务器上访问的 Web 应用程序当前不可用。解决办法。
作者:随然 日期:2009-05-26
最近在架设服务器的时候，安装的最新版本的WINDOWS SERVER 2003 ，安装好以后自带.NET Framwor 2.0 感觉很好，觉得不用再自己安装了。在运行一个ASP.NET程序的时候，却发现用不了，提示如下：
引用内容
开始以为是.NET Framwor 版本的问题，因为该程序是在.NET Framwor 1.1 下编写的，以前就听说1.1下写的某些程序不能在2.0下正常运行，所以就赶紧去下了一个.NET Framwor 1.1 准备安装，可系统提示已经安装了最新版本的.NET Framwor ，无须再安装。有点郁闷，所以重新思考问题解决的思路。仔细查看上面错误提示，发现和以前由于.NET Framwor的版本不一样导致的错误提示不一样。于是就感觉是系统设置的问题了。在网上查询了一下，终于找到了解决办法。
引用内容
引用内容您试图在此 Web 服务器上访问的 Web 应用程序当前不可用。请点击 Web 浏览器中的“刷新”按钮重试您的请求。管理员注意事项: 详述此特定请求失败原因的错误信息可在 Web 服务器的系统事件日志中找到。请检查此日志项以查明导致该错误发生的原因。
开始以为是.NET Framwor 版本的问题，因为该程序是在.NET Framwor 1.1 下编写的，以前就听说1.1下写的某些程序不能在2.0下正常运行，所以就赶紧去下了一个.NET Framwor 1.1 准备安装，可系统提示已经安装了最新版本的.NET Framwor ，无须再安装。有点郁闷，所以重新思考问题解决的思路。仔细查看上面错误提示，发现和以前由于.NET Framwor的版本不一样导致的错误提示不一样。于是就感觉是系统设置的问题了。在网上查询了一下，终于找到了解决办法。
引用内容搜索了网上的大量资料，该问题比较经典，出现错误也很多，但国内与国外的网站与论坛上却没有比较完善的解决方法。经过一番摸索与尝试，终于有了比较好的解决方法。有三，如下：
1.重新开一个应用程序池，然后为这个目录单独指定这个池
2.访问权限的设置问题
3.重新装iis,再装framework
我的问题是属于第二个，访问权限的问题。做如下设置即可解决该问题：
1.重新开一个应用程序池，然后为这个目录单独指定这个池
2.访问权限的设置问题
3.重新装iis,再装framework
我的问题是属于第二个，访问权限的问题。做如下设置即可解决该问题：
HTML转换成UBB代码的JAVASCRIPT和ASP函数程序
作者:随然 日期:2009-04-05
在做网站的过程中，经常会遇到把UBB代码的文字内容转换成HTML代码显示出来，有的时候也会把HTML代码转换成UBB代码。比如在使用ASP+WML制作WAP网站的过程中，就遇到了这个问题。
文字内容包含有<table><tr><td>等HTML的代码，手机浏览时无法正常在WML页面中显示出来，所以就可以把这些HTML代码标签转换成UBB代码，然后再转换成简单的WML支持的HTML代码显示出来。
下面提供两种代码供大家选择：
第一种：JAVASCRIPT代码
HTML代码
[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]
文字内容包含有<table><tr><td>等HTML的代码，手机浏览时无法正常在WML页面中显示出来，所以就可以把这些HTML代码标签转换成UBB代码，然后再转换成简单的WML支持的HTML代码显示出来。
下面提供两种代码供大家选择：
第一种：JAVASCRIPT代码
HTML代码[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]
ASP 中如何判断用户名是否为字母和数字的组合
作者:随然 日期:2009-02-25
MySQL count(*) 与 count(col) count(1) 查询效率比较
作者:随然 日期:2009-02-09
Cookies的设计，时间过期的设计。
作者:随然 日期:2009-01-18
在ASP技术中，Cookie是Response的唯一的一个集合，是Web服务器在用户的浏览器中用来代表用户的令牌。当同一浏览器又一次请求同一Cookie设定的页面时，它将从用户端把上一次从Web服务器中收到的Cookie发送回Web服务器进行数据处理。在实际应用中，Cookie一直起着相当重要的作用，设置Cookie的属性和它的失效期在Cookie的使用中扮演着举足轻重的角色。特别像在一些很重要的场合，比如说在线投票、电子商务中，设置Cookie以及它的失效期是很重要的。
要设置Cookie的失效期可以使用Expires属性。Expires是期满、终止、失效的意思。该属性是只写的，用于设置Cookie的期限，指定Cookie的失效期。没有指定期限的Cookie只能通过浏览器所提供的Cookies功能，将信息暂时存放在用户端，而不能以文件的形式存储到用户的计算机上，当用户关闭该浏览器时，此Cookie自动失效。所以无失效期的Cookie不能跟踪用户的信息。要延长Cookie的生命周期，跟踪用户来访信息，就必须用Expires属性来设置Cookie的失效时间。
在讨论设置Expires属性之前，首先回顾一下ASP技术中表示时间的几个关键字：time 、date 和now。这样做的好处是有利于大家进一步的学习。下面先请大家看一段程序以及它的运行结果：
<html>
<head>
<title>时间测试</title>
要设置Cookie的失效期可以使用Expires属性。Expires是期满、终止、失效的意思。该属性是只写的，用于设置Cookie的期限，指定Cookie的失效期。没有指定期限的Cookie只能通过浏览器所提供的Cookies功能，将信息暂时存放在用户端，而不能以文件的形式存储到用户的计算机上，当用户关闭该浏览器时，此Cookie自动失效。所以无失效期的Cookie不能跟踪用户的信息。要延长Cookie的生命周期，跟踪用户来访信息，就必须用Expires属性来设置Cookie的失效时间。
在讨论设置Expires属性之前，首先回顾一下ASP技术中表示时间的几个关键字：time 、date 和now。这样做的好处是有利于大家进一步的学习。下面先请大家看一段程序以及它的运行结果：
<html>
<head>
<title>时间测试</title>
ASP给成绩排名(排序)的方法，要求分数相同的成绩名次相同
作者:随然 日期:2009-01-15
在用ASP制作成绩分析系统的时候，用到了很多的ASP函数，但就是没有成绩排名的函数，所以自己写了一个能排名的程序，供大家参考。我也想了几个能分析出一个分数在所有分数中占的位置或名次，想了半天还是觉得下面的办法来得简单一些，运算要快一些。
使用ASP给数据库中的成绩进行排名，要求分数相同的成绩名次相同。
实现思路：将成绩按从大到小排列，第一个数的名次写入1，然后循环，判断第二个数与第一个数是否相等，相等则写入相同的名次，不相等则名次加1，再循环……
使用ASP给数据库中的成绩进行排名，要求分数相同的成绩名次相同。
实现思路：将成绩按从大到小排列，第一个数的名次写入1，然后循环，判断第二个数与第一个数是否相等，相等则写入相同的名次，不相等则名次加1，再循环……
复制内容到剪贴板 程序代码
程序代码<%
'为班级排名
j=0
i=0
thesame=0
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select stu_no,cj_all from student where class_no="&banji&" order by cj_all desc"
rs.open sql,conn,1,1
do while not rs.eof
'如果分数相同，则名次相同。如：两个并列第一名，则没有第二名，下一个为第三名
if rs("cj_all")=thesame then
i=i
j=j+1
else
i=i+j+1
j=0
end if
thesame=rs("cj_all")
sql="update student set cj_banxu="&i&" where stu_no='"&rs("stu_no")&"'"
conn.execute(sql)
rs.movenext
loop
rs.close
%>
'为班级排名
j=0
i=0
thesame=0
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select stu_no,cj_all from student where class_no="&banji&" order by cj_all desc"
rs.open sql,conn,1,1
do while not rs.eof
'如果分数相同，则名次相同。如：两个并列第一名，则没有第二名，下一个为第三名
if rs("cj_all")=thesame then
i=i
j=j+1
else
i=i+j+1
j=0
end if
thesame=rs("cj_all")
sql="update student set cj_banxu="&i&" where stu_no='"&rs("stu_no")&"'"
conn.execute(sql)
rs.movenext
loop
rs.close
%>
ACCESS+ASP中文乱码问题的解决方法
作者:随然 日期:2009-01-14
以前好好执行的ASP教本，居然会乱码，直接写HTML格式的中文不乱码，使用response.write就是乱码，这在以前都是好好的，不知道怎么就突然就变了，改成UTF-8编码显示，则使用response.write输出的显示正常，其他则乱码，看来是编码方式不协调。
方法一：
在每一页的开头加上
<%@ CODEPAGE = "936" %>
或
<%@ LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
@CODEPAGE
可以使用 @CODEPAGE 指令为 .asp文件设置代码页。代码页是一个字符集，包括数字、标点符号及其他字符。不同的语言和现场
用不同的代码页。例如，ANSI 代码页 1252 为美国英语和大多欧洲语言所使用，而 OEM 代码页 932 为日本汉字所使用。
方法一：
在每一页的开头加上
<%@ CODEPAGE = "936" %>
或
<%@ LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
@CODEPAGE
可以使用 @CODEPAGE 指令为 .asp文件设置代码页。代码页是一个字符集，包括数字、标点符号及其他字符。不同的语言和现场
用不同的代码页。例如，ANSI 代码页 1252 为美国英语和大多欧洲语言所使用，而 OEM 代码页 932 为日本汉字所使用。
