存档
如果做企业站，ASP+Access是一个最佳选择。但是如果Access的数据库达到G级别，那么性能可能就会大大的下降。如果数据库没有优化，打开asp页面几秒是常有的事情。如果一个Access表内几十万条数据，恰巧ASP页面又有几十个查询，可能就悲剧了。网站打开时间要按分钟计算了。
Asp+Access以前数据量少的时候，没有任何问题。数据量一大，各种麻烦的问题就多了起来。总不能让客户等几分钟打开首页把。
Const BASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
Private sBASE_64_CHARACTERS
Function Base64encode(ByVal asContents)
asContents = strUnicode2Ansi(asContents)
Dim lnPosition,lsResult,Char1,Char2,Char3,Char4,Byte1,Byte2,Byte3,SaveBits1,SaveBits2,lsGroupBinary,lsGroup64,M4, len1, len2
len1 = LenB(asContents)
If len1 < 1 Then
Base64encode = ""
Exit Function
[...]
在很多场合，特别重要的要加密传输。使用成熟的加密算法是一个不错的选择，但是~ 有些算法这个语言支持而另一种语言不支持。或者直接要安装某某组件，实在是太烦琐了，为了方便以后使用，自己抽空写了一个。
最近经常需要开发API，Microsoft.XMLHttp、MSXML2.XMLHTTP 等组件不能满足我的要求(主要是不能自定义header等信息)，通过查资料发现了WinHttp.WinHttpRequest.5.1，但是关于winhttprequest的资料太少了。通过这几天摸索，勉强了解了WinHttpRequest使用方法。
自己写的ASP汉字转拼音的程序，支持部分不常见汉字的拼音。更多不常见汉字的拼音正在整理中，更新地址：http://www.miaoqiyuan.cn/product/update/pinyin.db.rar
‘=====================================================================
‘ 意见反馈地址：http://www.miaoqiyuan.cn/p/asp-pinyin
‘ 最新数据库：http://www.miaoqiyuan.cn/Products/update/pinyin.db.zip
‘=====================================================================
‘函数名：GET_PINYIN
‘ 功能：返回拼音
‘ 参数：word – 要转换的汉字，只支持一个汉字
Function GET_PINYIN(word)
if asc(word) > 0 and asc(word) < 128 then
GET_PINYIN = word
[...]