ASP过滤SQL非法字符并格式化html

作者:wang 日期:2009-10-13

'Jmail邮件发送
Function SendJmail(Email,Topic,MailBody)

Dim JMail
on error resume next

分类:应用开发 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2467

ASP过滤SQL非法字符并格式化html代码

作者:wang 日期:2009-10-13

<%
function changechr(str)
changechr=replace(replace(replace(replace(str,"<","<"),">",">"),chr(13),"<br>")," "," ")
changechr=replace(replace(replace(replace(changechr,"[sayyes]","<div align=center><img src="),"","<b>"),"[red]","<font color=CC0000>"),"[big]","<font size=7>")
changechr=replace(replace(replace(replace(changechr,"[/sayyes]","></img></div>"),"","</b>"),"[/red]","</font>"),"[/big]","</font>")

分类:应用开发 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2437

ASP汉字编码互转

作者:wang 日期:2009-10-13

<%
'System.Text.Encoding.GetEncoding

'汉字gb2312转换为UTF-8编码：
function chinese2unicode(Str)

分类:应用开发 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2936

ASP连接数据库CONN.ASP

作者:wang 日期:2009-10-13

第一种 - 这种方法用在ACCESS中最多
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" _
& Server.MapPath("aspfree.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn

分类:应用开发 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2658