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 为日本汉字所使用。
ASP从字符串中提取数字或者字符串转数字型的方法
作者:随然 日期:2009-01-14
Cint函数是返回一个数字类型但是参数需要是有效的表达式，也就是说转换的的确是数字，比如字符串“123”，就可以用Cint("123") 转换成数字型。 类似“6879汉字汉字”这样的字符串Cint函数是没法转换的，这是指定内容的提取。用下面的函数可以达到把字符串中的数字提取出来。
<%
Function getNum(str)
Dim length,num
length=Len(str)
num=0
For i=1 To length
char=Mid(str,i,1)
If isNumeric(char) Then num=num*10+Int(char)
Next
<%
Function getNum(str)
Dim length,num
length=Len(str)
num=0
For i=1 To length
char=Mid(str,i,1)
If isNumeric(char) Then num=num*10+Int(char)
Next
