ASP
关注
分享
扫一扫
tourstar
SOFTWARE（中国） 121042753
群介绍:
SQL SERVER、MY SQL、ORACLE、ASP.NET(C#)、WINFORM、JAVA、WPF、WCF、IOS、C、安卓
欢迎各位朋友的加入，让我们共同打造中国软件！
展开
-
数据的查询、模糊查询、新建、修改、删除
dim sqluserName = Trim(Request("Cnname")) 用户名m_name = Trim(Request("m_name")) 姓名sql ="select * from v_CRM_User where UserTypeName=超级管理员"set rs=server.createobject("adodb.recordset")if use原创 2010-05-16 12:14:00 · 520 阅读 · 0 评论 -
iframe引用控件
&strFileName=&strPath=UpLoadFiles/&strField=c">原创 2010-05-16 12:38:00 · 407 阅读 · 0 评论 -
For遍历出列表信息
dim menuid3 set rs=server.createobject("adodb.recordset") rs.open "select menuId from menus where menuname=政策法规",conn,1,1 if not rs.eof then for i=1 to rs.recordcount if i=原创 2010-05-16 19:45:00 · 571 阅读 · 0 评论 -
md5加密算法
Private Const BITS_TO_A_BYTE = 8Private Const BYTES_TO_A_WORD = 4Private Const BITS_TO_A_WORD = 32Private m_lOnBits(30)Private m_l2Power(30) Private Function LShift(lValue, iShiftBits) If iShiftB原创 2010-05-16 19:48:00 · 248 阅读 · 0 评论 -
连接数据库详细版
Server.ScriptTimeout=9999session.Timeout=999Dim Database_Conn,Database_Path,conndbtypeconndbtype="1" Dim ConnSet Conn = Server.CreateObject("Adodb.Connection")If conndbtype="1" Then Database_Path =原创 2010-05-16 12:08:00 · 437 阅读 · 0 评论 -
半角全角转换
Function DBC2SBC(Str, flag) rem 全角半角转换函数 rem flag=-1时进行半角转全角 rem flag=0时进行半角全角互转 rem flag=1时进行全角转半角 Dim i, sStr If Len(Str)DBC2SBC = "" For i = 1 To Len(Str) sStr = Asc(Mid(Str, i, 1)) Select Ca原创 2010-05-16 12:43:00 · 411 阅读 · 0 评论 -
强制浏览器重新访问服务器下载页面
强制浏览器重新访问服务器下载页面，而不是从缓存读取页面Response.Buffer = TrueResponse.Expires = -1Response.ExpiresAbsolute = Now() - 1Response.Expires = 0Response.CacheControl = "no-cache"if session("Cnname")="" or session原创 2010-05-16 19:50:00 · 694 阅读 · 0 评论