Asp随机生成一个密码

<%
'生成随机密码

genPassword = ""
Randomize
For i = 1 to 8
intNum = Int(10 * Rnd + 48)
intUpper = Int(26 * Rnd + 65)
intLower = Int(26 * Rnd + 97)
intRand = Int(3 * Rnd + 1)
Select Case intRand
Case 1
strPartPass = Chr(intNum)
Case 2
strPartPass = Chr(intUpper)
Case 3
strPartPass = Chr(intLower)
End Select
genPassword = genPassword & strPartPass
Next
response.write(genPassword & "<br>")
 %>

post by 不懂戀愛魚兒 | 2010年8月12日 | 归档于 [Asp技术]
标签: asp

Asp价格大于10000时显示万字方法

直接COPY下面代即可

<%
Dim Punit
Punit=150000 '此处调用你的价格或其它数值
if Punit>=10000 then
response.write Punit/10000 & "万元"
else
response.write Punit & "元"
end if%>

post by 不懂戀愛魚兒 | 2010年8月12日 | 归档于 [Asp技术]
标签: asp

FCKeditor Asp版上传文件时自动重命名方法

至于FCK的精减就不说了.可以百度一下或者说哪天有时间了再写这个精减文章.(本版本为FCK 2.6.6)

首先打开FCKeditor\editor\filemanager\connectors\asp\config.asp文件.

ConfigIsEnabled = true '启用上传功能 把 false 改成 true

然后找到FCKeditor\editor\filemanager\connectors\asp\下的

commands.asp 与 io.asp文件

commands.asp

找到:sFileName = SanitizeFileName( sFileName )

在这行的下边一行添加:

sFileName = GetID("LwpCms") & "." & Split(sFileName,".")(1)

io.asp

找到:function SanitizeFileName( sNewFileName )

阅读全文>>

post by 不懂戀愛魚兒 | 2010年8月11日 | 归档于 [Php技术]

dreamweaver初始化扩展数据时卡住

C:\Documents and Settings\Administrator\Application Data\Macromedia\Dreamweaver 8\Configuration\

缓存和一些临时文件

删除SiteCache中的内容 启动成功

post by 不懂戀愛魚兒 | 2010年8月9日 | 归档于 [我的日记]
标签: dreamweaver

安装程序配置服务器失败。参考服务器错误日志和 C:\WINDOWS\sqlstp.log 了解更多信息

Process Exit Code: (1060) 指定的服务未安装

SQLServer2000重装.装到最后配制文件时.却跳出一个对话框"安装程序配置服务器失败。参考服务器错误日志和 C:\WINDOWS\sqlstp.log 了解更多信息。"

查了安装日志如下:

阅读全文>>