asp+fso在线管理图片功能 <font color=red>原创</font>

2016年07月27日 42 阅读

复制代码 代码如下:<% "--------------------------------------------- "##############20060528新增加了对端口的支持 "作者：dxyQQ:461478385Email:douxy001@gmail.com "功能完善 %> <！--#includefile="global.asp"--> <！--#includefile="session.asp"-->...

ASP在SQL Server 2000中新建帐号和权限

2016年07月27日 45 阅读

"以下为在asp中增加一个sqlserver2000用户函数,并为建立一个数据库，给他dbo的权限"****************注意：sqlserver的验证方式不要选仅为windows方式，"****************允许远程sqlserver连接"****************该函数已通过测试****************************"有什么问题欢迎和我交流，以后会推出对sqlserver的一些管理操作程序 "参数：StrLo...

asp中Byval与Byref的区别

2016年07月27日 44 阅读

文件名称:ByVal.aspByRef.asp具体代码:<%Sub TestMain（）Dim A : A=5Call TestBy（A）Response.write AEnd SubSub TestBy（ByVal T）T=T+1End subcall TestMain（）%><%Sub TestMain（）Dim A : A=5Call TestBy（A）Response.write AEnd SubSub TestBy（ByRef ...

全面认识ASP注入技巧

2016年07月27日 44 阅读

复制代码 代码如下:1.判断是否有注入 ;and1=1 ;and1=2 2.初步判断是否是mssql ;anduser>0 3.注入参数是字符 "and[查询条件]and""=" 4.搜索时没过滤参数的 "and[查询条件]and"%25"=" 5.判断数据库系统 ;and（selectcount（*）fromsysobjects）>0mssql ;and（selectcount（*）frommsysobjects）>0access 6....

ubbcode函数

2016年07月27日 41 阅读

复制代码 代码如下:<% PublicFunctionUbbCode（strContent） Dimre Setre=NewRegExp re.IgnoreCase=True re.Global=True "过滤危险脚本 re.Pattern="（</script>）" strContent=re.Replace（strContent,"</script>"） re.Pattern="（script:）" strContent...

newasp中下载类

2016年07月27日 47 阅读

复制代码 代码如下:<% "================================================ "函数名：SaveRemoteFile "作用：保存远程文件到本地 "参数：strFileName----保存文件的名称 "strRemoteUrl----远程文件URL "返回值：布尔值True/False "================================================ FunctionS...

[ASP]精华代码

2016年07月27日 46 阅读

复制代码 代码如下:<% "--Loader.asp-- "--version1.5.2 "--lastupdated12/5/2002 " "FaisalKhan "faisal@stardeveloper.com "www.stardeveloper.com "Classforhandlingbinaryuploads ClassLoader Privatedict PrivateSubClass_Initialize Setdict=Serve...

由给定的字符串生成关键字

2016年07月27日 44 阅读

"函数名：CreateKeyWord "作用：由给定的字符串生成关键字 "参数：Constr---要生成关键字的原字符串 "返回值：生成的关键字 "************************************************** FunctionCreateKeyWord（byvalConstr,Num） IfConstr=""orIsNull（Constr）=TrueorConstr="$False$"Then CreateKeyWo...

经验几则

2016年07月27日 46 阅读

以下是我开发时碰到的问题以及心得经验，花了些时间调试，贴出来避免大家少走弯路，如有错误欢迎指正， 持续更新ing xml文件尽量以utf-8编码，gb2312有些字是存储不了的，如©,就算能存也需要转换，比较麻烦，utf-8也符合 国际规范 CSS中:hover这个伪类，如果放在:visited前面则会失效 <a>标签如果没有href属性，所有对它的css的伪类如:hover均失效 js文件中用document.wirte（"<...

转换中文为unicode 转换unicode到正常文本

2016年07月27日 44 阅读

复制代码 代码如下:"//转换中文为unicode functionURLEncoding（vstrIn） dimi dimstrReturn,ThisChr,innerCode,Hight8,Low8 strReturn="" fori=1toLen（vstrIn） ThisChr=Mid（vStrIn,i,1） IfAbs（Asc（ThisChr））<&HFFthen strReturn=strReturn&ThisChr else innerC...

在ASP应用程序中限制重复提交同一表单

2016年07月27日 45 阅读

在Internet上我们每天都会遇到数不清的表单，也看到其中大部分并没有限制用户多次提交同一个表 单。缺乏这种限制有时候会产生某些预料不到的结果，如重复订阅邮件服务或重复投票等。或许一些 asp初学者并不清楚在asp应用中如何限制重复提交同一表单，所以在这里向大家介绍在ASP应用中防止 用户在当前会话期间多次提交同一表单的一个简单方法。 这个工作主要由四个子程序组成，在较为简单的应用场合，你只要将这些代码放在包含文件中直 接引用即可；对于那些较为复杂的...

ASP 程序实现自动升级功能

2016年07月27日 46 阅读

现在流行虚拟主机建站，我也有个网站，也算是个站长咯。当了近一年的站长，感到网站程序每次升级的时候颇为麻烦：先去官方看公告，然后下载升级包到本地，解压，FTP上传到虚拟主机。这些都是累人的体力活，加之本人又懒得很，所以异想天开的觉得要是程序能够自动升级就好了。所以就想了想，写了本文，希望对WEB程序开发者有帮助。这里只针对ASP，因为我只会ASP:-（ 先看看传统的win32程序的升级过程（比如杀毒软件），它是依靠软件的升级程序通过网络连接到服务器分析并下载...

在ASP编程中使用数组

2016年07月27日 45 阅读

数组的定义 DimMyArray MyArray=Array（1,5,123,12,98） 可扩展数组 DimMyArray（） fori=0to10 ReDimPreserveMyArray（i） MyArray（i）=i next 将一个字符串分割并返回分割结果的数组 DimMyArray MyArray=Split（tempcnt,chr（13）&chr（10）） ForI=Lbound（MyArray）toUbound（MyArray） Respo...

asp组件编写准备工作

2016年07月27日 43 阅读

最近在尝试用组件写asp,一些心得如下，不对之处请指正 经常要重启IIS，所以需要一个批处理的文件,将下面两行代码存为xxx.bat netstopw3svc netstartw3svc 经常需要注册、卸载dll，所以需要在右键菜单中添加两行注册和反注册DLL项，将下面几行代码存为xxx.reg，注入注册表 WindowsRegistryEditorVersion5.00 [HKEY_CLASSES_ROOTdllfileshell] [HKEY_CL...

利用AdoDb.Stream对象来读取UTF-8格式的文本文件

2016年07月27日 45 阅读

复制代码 代码如下:"函数名称:ReadTextFile "作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件 "---------------------------------------------------- FunctionReadFromTextFile（FileUrl,CharSet） IfFileUrl=""ORIsNull（FileUrl）Then ReadFromTextFile="" ExitFunction En...

ASP代码的对象化

2016年07月27日 52 阅读

提起asp很多人就认为是一堆html脚本和被括在<%和%>之中的一些代码还有就是一些javascript脚本等筹在一起的一些代码的集合，这样的代码，再加上各类的不同格式的注释，看起来就一个字：乱。也不管别人能不能看得懂，只要是能实现自己的目的就可以了，因为asp的代码也是脚本，给了客户也不可能不被人看到其中的内容，经多包容在dll中一部分业务逻辑，但是还是觉得asp代码是最不值钱的代码，没有人回去购买，可以随时从别人的网站中查看源码的形式得到别...

把字符串转换成数据库SQL语句格式

2016年07月27日 47 阅读

复制代码 代码如下:"把字符串转换成数据库SQL语句格式 "------------------------------------------------- FunctionAllStr2Database（str,strType） DimstrTemp:strTemp=str SelectCasestrType Case"" Case"num" strTemp=Clng（strTemp） Case"string""无Trim strTemp=Replac...

access中链接表的问题

2016年07月27日 47 阅读

一个使用asp和mdb的站点，某个mdb中使用了链接表，链接到当前目录的另一个mdb中的表，这样可以达到数据共享。 faq-it.org/delphi_win_sdk/问题来了，当将网站发布到网站的时候，因为网上空间路径和我本机不同，所以链接表失败，网页当然也不能打开。 我觉得解决办法有： 一种，在本机上创建与网上空间完全相同的目录结构。但这很麻烦，特别是经常要换网站的话。 一种，如何让链接表使用相对路径，就是链接到当前目录下的那个mdb文件？（对了，ac...

access数据库的一些少用操作,ASP,创建数据库文件,创建表,创建字段,ADOX

2016年07月27日 45 阅读

复制代码 代码如下:<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%> <% ifTrim（Request.Form（"TableName"）） "----设置打开数据库连接 dbs="DataSource="+server.mappath（"database.mdb"）+";Provider=Microsoft.Jet.OLEDB.4.0;" setconn=server.createobject（"ADODB...

Asp Access 创建静态文件/HTML

2016年07月27日 45 阅读

作用说明: 本代码实现从Access提取数据以创建HTML文件,不建文件夹. 如果文件名与要创建的文件名相同,则覆盖,跟SQL的更新一样的原理. 待加功能:删除与查找. 复制代码 代码如下:<% """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" " "subject:Asp创建静态文件/HTMLByStabx " "writer:Stabx<shaw...