vs2003无法打开项目的解决办法，打开解决方案过程假死
[ 2015-04-24 09:08:46 | 作者: admin ]
今日发现vs2003一直都无法打开项目，点项目就一直在打开web项目
后来发现资源管理器重cpu耗用较多（sohunews 等），将耗cpu的进程结束之后就可以正常打开了，看来是sogou拼音的弹出新闻程序问题，冲突了。
除了程序兼容问题，还可以试试删除项目 WebSite ，然后重新载入项目，有时候能解决问题
后来发现资源管理器重cpu耗用较多（sohunews 等），将耗cpu的进程结束之后就可以正常打开了，看来是sogou拼音的弹出新闻程序问题，冲突了。
除了程序兼容问题，还可以试试删除项目 WebSite ，然后重新载入项目，有时候能解决问题
asp来处理json的\u编码
[ 2015-02-04 15:50:27 | 作者: admin ]
输入：{"status":"error","message":"\u53c2\u6570\u9519\u8bef"}
返回：{"status":"error","message":"参数错误"}
返回：{"status":"error","message":"参数错误"}
html = replace(html,"\u","%u")
html = unescape(html)
html = unescape(html)
asp版本中ueditor的目录权限判断问题
[ 2014-03-29 13:07:47 | 作者: admin ]
ueditor采用遍历目录每个节点来判断目录是否存在，不存在就建立一个，而根目录 f:\ 这样的往往不会赋予i_usr的权限，所以容易报 权限不足
打开config.asp，只设置一个主目录upload,并且建立后赋予读写权限
config.Add "imageSavePath", Array("upload1","upload2","upload3")
改为
config.Add "imageSavePath", Array("upload")
Uploader.Class.asp 修改路径判断，只建立一层目录，这样就会产生 upload/20140329的目录
阅读全文…
打开config.asp，只设置一个主目录upload,并且建立后赋予读写权限
config.Add "imageSavePath", Array("upload1","upload2","upload3")
改为
config.Add "imageSavePath", Array("upload")
Uploader.Class.asp 修改路径判断，只建立一层目录，这样就会产生 upload/20140329的目录
Private Function CheckOrCreatePath( ByVal path )
...阅读全文…
Ueditor怎么加载数据库中的内容
[ 2014-03-21 12:09:56 | 作者: admin ]
<script type="text/javascript" charset="gbk" src="/ueditor1_3_6/ueditor.config.js"></script>
<script type="text/javascript" charset="gbk" src="/ueditor1_3_6/ueditor.all.min.js"> </script>
<script type="text/javascript" charset="gbk" src="/ueditor1_3_6/lang/zh-cn/zh-cn.js"></script>
需要注意表单的html格式必须准确，不然无法获取 request.form("infobody")
错误的格式：<table><form><tr>...</tr></form></table>
正确的格式：<form><tab...
阅读全文…
<script type="text/javascript" charset="gbk" src="/ueditor1_3_6/ueditor.all.min.js"> </script>
<script type="text/javascript" charset="gbk" src="/ueditor1_3_6/lang/zh-cn/zh-cn.js"></script>
需要注意表单的html格式必须准确，不然无法获取 request.form("infobody")
错误的格式：<table><form><tr>...</tr></form></table>
正确的格式：<form><tab...
阅读全文…
asp MD5加密（16位、32位）代码 ，支持中文，兼容php
[ 2013-06-19 15:00:17 | 作者: admin ]
http://hi.baidu.com/gdz0703/item/0e0ed5accea5b1f614329b05
ASP以字符为单位,比如DVBBS的,应该以字节为单位读取才是,总的来说是计算上的缺点
谢谢楼上诸位的热心解答，本人把MD5.asp修改如下，问题就解决了。
现在把代码贴下面，希望对需要的人有帮助~~！！
<%
<%
Private Const BITS_TO_A_BYTE = 8
Private Const BYTES_TO_A_WORD = 4
Private Const BITS_TO_A_WORD = 32
Private m_lOnBits(30)
Private m_l2Power(30)
Dim Md5OLD
Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then...
阅读全文…
ASP以字符为单位,比如DVBBS的,应该以字节为单位读取才是,总的来说是计算上的缺点
谢谢楼上诸位的热心解答，本人把MD5.asp修改如下，问题就解决了。
现在把代码贴下面，希望对需要的人有帮助~~！！
<%
<%
Private Const BITS_TO_A_BYTE = 8
Private Const BYTES_TO_A_WORD = 4
Private Const BITS_TO_A_WORD = 32
Private m_lOnBits(30)
Private m_l2Power(30)
Dim Md5OLD
Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then
阅读全文…
让asp立即输出缓存 Response.flush
[ 2013-01-07 15:26:53 | 作者: admin ]
让asp立即输出缓存(Response.flush),实时显示数据
如果有网页比较慢，可以立即输出缓存，让浏览者看到当前执行的状态
for i=0 to 1000
response.write i&"test"
response.flush
next
如果有网页比较慢，可以立即输出缓存，让浏览者看到当前执行的状态
for i=0 to 1000
response.write i&"test"
response.flush
next
简单的产生一个随机数
生成一批不重复的随机数
函数一
阅读全文…
'rnd() 函数是产生一个0到1之间的浮点数
'获取一个4位的随机数
randomize()
ranNum=int( (9999-1000) * rnd(now())+ 1000) '最大为9999，最小为1000
'获取一个4位的随机数
randomize()
ranNum=int( (9999-1000) * rnd(now())+ 1000) '最大为9999，最小为1000
生成一批不重复的随机数
函数一
'参数说明:c_floor随机数的下限,c_upper随机数的上限,num要生成随机数的个数
'注意:c_floor<c_upper而且都不能为负数,num<=c_upper-c_floor,否则会出现死循环
'调用 call random(1,40,10) 随机产生10个1-40之间的数字
Function random(c_floor,c_upper,num)
Dim a(),temp,flag,i,j
Redim a(num) '重定义数组
...'注意:c_floor<c_upper而且都不能为负数,num<=c_upper-c_floor,否则会出现死循环
'调用 call random(1,40,10) 随机产生10个1-40之间的数字
Function random(c_floor,c_upper,num)
Dim a(),temp,flag,i,j
Redim a(num) '重定义数组
阅读全文…
asp读取mdb数据库所有表名的代码
[ 2012-10-24 12:17:23 | 作者: admin ]
第一个文件：adovbs.inc:
<%
'---- SchemaEnum Values ----
Const adSchemaProviderSpecific = -1
Const adSchemaAsserts = 0
Const adSchemaCatalogs = 1
Const adSchemaCharacterSets = 2
Const adSchemaCollations = 3
Const adSchemaColumns = 4
Const adSchemaCheckConstraints = 5
Const adSchemaConstraintColumnUsage = 6
Const adSchemaConstraintTableUsage = 7
Const adSchemaKeyColumnUsage = 8
Const adSchemaReferentialContraints = 9
...
阅读全文…
<%
'---- SchemaEnum Values ----
Const adSchemaProviderSpecific = -1
Const adSchemaAsserts = 0
Const adSchemaCatalogs = 1
Const adSchemaCharacterSets = 2
Const adSchemaCollations = 3
Const adSchemaColumns = 4
Const adSchemaCheckConstraints = 5
Const adSchemaConstraintColumnUsage = 6
Const adSchemaConstraintTableUsage = 7
Const adSchemaKeyColumnUsage = 8
Const adSchemaReferentialContraints = 9
...
阅读全文…
