博文

[置顶] FCKeditor使用入门(2005-11-27 02:42:00)

摘要:如果你知道FCKeditor编辑器功能的强大,正好想用它却不知道如何下手时,请跟我来! 先说一下我的测试环境:XPSP2,IIS5.1,FCKeditor2.0 在IIS上建立一个新的站点,我直接取名为FCKeditor在DW里建立一个相对应的站点,测试服务器为本机,支持VBScript下载FCKeditor2.0,这个东西是开源的,网上能下到的地方很多,自己找去…… 下载下来的应该是压缩包,解压到FCKeditor站点根目录,什么都不需要更改,直接就可以开始调用了。等你会了的时候,会发现简单得要死去! 在站点根目录下,新建一个index.asp页面,<body>段内加如下代码(调用编辑器): <% Dim oFCKeditor Set oFCKeditor = New FCKeditor oFCKeditor.BasePath = "/FCKeditor/"  //设置编辑器的路径,我站点根目录下的一个目录 oFCKeditor.ToolbarSet = "Default" oFCKeditor.Width = "100%" oFCKeditor.Height = "600"  oFCKeditor.Value = "" //这个是给编辑器初始值 oFCKeditor.Create "logbody" //以后编辑器里的内容都是由这个logbody取得,命名由你定  %> 加了这一段别忘了在index.asp前面第二行加上 <!--#include file="FCKeditor/fckeditor.asp" --> 把fckeditor.asp包含进来。切记切记! 就这么简单! 现在你只要把这个编辑器当成一个控件来使用,提取它的数据时用:request("logbody") 现在松口气吧。测试成功了。里面有些设置,去网上找些高级的使用说明来看吧。 《柠檬园主》的高级说明。我又从这里获得了帮助。http://3rgb.com/b/?act=viewthread&threadid=324 ......

阅读全文(9015) | 评论:1

[置顶] rs.open sql,conn,1,1全接触(2005-10-21 00:12:00)

摘要:以下内容摘自:http://www.cocooba.com/blog/post/101.html RS.OPEN SQL,CONN,A,BA: ADOPENFORWARDONLY(=0) 只读,且当前数据记录只能向下移动ADOPENKEYSET(=1) 只读,当前数据记录可自由移动ADOPENDYNAMIC(=2) 可读写,当前数据记录可自由移动ADOPENSTATIC(=3) 可读写,当前数据记录可自由移动,可看到新增记录B:ADLOCKREADONLY(=1) 缺省锁定类型,记录集是只读的,不能修改记录ADLOCKPESSIMISTIC(=2) 悲观锁定,当修改记录时,数据提供者将尝试锁定记录以确保成功地编辑记录。只要编辑一开始,则立即锁住记录。ADLOCKOPTIMISTIC(=3) 乐观锁定 ,直到用Update方法提交更新记录时才锁定记录。ADLOCKBATCHOPTIMISTIC(=4) 批量乐观锁定,允许修改多个记录,只有调用UpdateBatch方法后才锁定记录。当不需要改动任何记录时,应该使用只读的记录集,这样提供者不用做任何检测。对于一般的使用,乐观的锁定可能是最好的选择,因为记录只被锁定一小段时间,数据在这段时间被更新。这减少了资源的使用......

阅读全文(3441) | 评论:0

(转)防ASP木马,删除相关组件(2007-11-11 22:16:00)

摘要:  如何卸载Wscript.Shell等对象 1、卸载wscript.shell对象在cmd下运行:regsvr32 WSHom.Ocx   /u2、卸载FSO对象在cmd下运行:regsvr32.exe scrrun.dll /u3、卸载stream对象在cmd下运行:regsvr32 /s /u "C:\Program Files\Common Files\System\ado\msado15.dll" 如果要重新启用:请把/u参数对掉就行了! 禁止WScript.Shell 防范此类病毒的方法就是将Windows scripting host卸载掉,具体方法是:我的电脑→控制面板→添加/删除程序→安装WINDOWS→附件→详细资料→Windows scripting host→确定。其实还有一种方法更简单,依次键入下面两段命令:regsvr32/u wshom.ocx回车、regsvr32/u wshext.dll回车,就可以把注册表中.wsh对象的注册值删掉。这样那些必须依靠对象运行的病毒就因为找不着对象而无法运行下去。 \\\\\\\\\\\\\\\\\\\\\\\\\\防范Wscript.Shell组件的方法: 可以通过修改注册表,将此组件改名。 HKEY_CLASSES_ROOT\WScript.Shell\及HKEY_CLASSES_ROOT\WScript.Shell.1\ 改名为其它的名字,如:改为WScript.Shell_ChangeName或WScript.Shell.1_ChangeName自己以后调用的时候使用这个就可以正常调用此组件了 也要将clsid值也改一下 HKEY_CLASSES_ROOT\WScript.Shell\CLSID\项目的值 HKEY_CLASSES_ROOT\WScript.Shell.1\CLSID\项目的值 也可以将其删除,来防止此类木马的危害。 防范Shell.Application组件的方法: 可以通过修改注册表,将此组件改名。 HKEY_CLASSES_ROOT\Shell.Application\ 及 HKEY_CLASSES_ROOT\Shell.Application.1\ 改名为其它的名字,如:改为Shell.Applica......

阅读全文(4107) | 评论:2

ASP常用的检测服务器代码(2007-07-24 11:51:00)

摘要:服务器现在时间:  引用<% =now %> 服务器CPU型号:  引用<%=Request.ServerVariables("HTTP_UA_CPU")%> 当前分辨率:  引用<% =Request.ServerVariables("HTTP_UA_PIXELS")%> 可显示颜色:[qoute]<%=Request.ServerVariables("HTTP_UA_COLOR")%>[/quote] Server地址:  引用<%=Request.ServerVariables("SERVER_NAME")%> 服务器接受语言:  引用<%=Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")%> 访问者I:P  引用<%=Request.ServerVariables("REMOTE_ADDR")%> 访问者浏览器版本及系统:  引用<%=Request.ServerVariables("HTTP_USER_AGENT")%> 服务器可接受文件:  引用<%=Request.ServerVariables("HTTP_ACCEPT")%> WEB服务器软件及版本信息:  引用<%=Request.ServerVariables("SERVER_SOFTWARE")%> 路由端口:  引用<%=Request.ServerVariables("REMOTE_PORT")%> 服务器http端口:  引用<%=Request.ServerVariables("LOCAL_PORT")%> WEB目录名称:  引用<%=Request.ServerVariables("APPL_PHYSICAL_PATH")%> 当前WEB页位置:  引用<%=Request.ServerVariables("PATH_TRANSLATED")%> 请求方式:  引用<%=Request.ServerVa......

阅读全文(2303) | 评论:0

Asp的基本对象(2007-01-03 19:54:00)

摘要:一、Asp的基本对象  Asp(Active Server Page)是一种类似于VB的面向对象的程序语言。在这里并不想详述对象等一些基本概念,而是直接介绍其语言特性,以便开发人员能够熟练地对asp程序进行修改和编制(因为很多人都只是直接利用开发工具如InterDev来生成asp程序)。  首先,Asp程序的存档名称肯定是“asp”;其次,在asp程序里面,服务器端的Script要放在字符串中间,例如。如果你想在一个Asp文件中调用另一个Asp文件,则可在Asp中加上下面的声明: < ! -- #INCLUDE VIRTUAL|FILE="***.asp" -- >,这有些象C语言中的#include。其中,Virtual表示虚拟文件路径,File表示真实文件路径。  Asp有五个主要的内建对象:Request、Response、Server、Session、Application,下面将分别举例对其进行说明。  1、Request  Asp依然遵从流行的、利用客户端的Form进行数据交换的方法。Asp内建的request对象拥有五个获取客户端资料的方法(QueryString/Form/Cookies/ServerVariables/ClientCertificate)。   语法:request.方法名称("参数")|request("参数")   如果采用后者,系统会自动选择相应的方法。   Form    这里再重新强调Form的一些属性:    Enctype=资料传送的MIME形态    Method=传送资料的方式Get/Post    Onrest=按下rest键调用的程序    Onsubmit=按下sumit键调用程序    Target=输出内容的frame窗口>    使用Form传送信息一般有三种方式:由html网页内的Form传信息给其他Asp;由Asp内的Form传信息给另外一个Asp;Asp内的信息传送给自身。     语法:Request.Form(参数)[(索引)]    其中参数表示Form中元素的名称,索引表示相同名称元素的顺序号。   例:  可循环读取名称为user的元素,其中Count是Form的系统属性,用于计算同名元素的个数,如果该元素不存在,则其值为零。如果没有指明要读取第几个同名元素,则系统会把......

阅读全文(1968) | 评论:0

设置cookies过期时间的几种方法(2007-01-03 19:42:00)

摘要:  Response.Cookies("user_name").Expires=Date+1 '指定cookie保存时间  保留COOKIES一个小时 Response.Cookies("MyCookie").Expires= (now()+1/24)  Response.Cookies("MyCookie").Expires = DateAdd("h", 1, Now())  Response.Cookies("CookieName").Expires=DateAdd("m",60,now())   设置60个月以后过期  Response.Cookies("User").expires=second()+7在expires后面定义的时间可以用时间函数代替例如:date()+7就表示在今天的时间上加上7天,而second()+7则是7秒了。 Response.Cookies("字段名").expires=时间函数+N,例如:Response.Cookies("name2").expires=date+1,表示Cookies保存1天,再比如:Response.Cookies("name2").expires=Hour+8,表示Cookies保存8小时。这种方法我测试过不行(在2003server,iis6.0中),不管second后面有无加(),访问时会出现500错误(还是无法显示网页?忘了)。 织梦尤文:这里的时间累加建议还是使用DateAdd函数,比如我们要累加一小时,则使用:Response.Cookies("baidooglecom").expires = DateAdd("h", 1, Now()) 30分钟:   Response.Cookies("CookieName").Expires=DateAdd("n",30,now()) dateadd("S",30,now()) 得到秒 Expires 指定 cookie 的过期日期。为了在会话结束后将 ......

阅读全文(2766) | 评论:0

求助:ASP调查问卷设计及分析统计方法(2006-12-23 14:12:00)

摘要:求助:ASP调查问卷设计及分析统计方法 最近公司需要做一份调查问卷,问卷题目形式多样,有单选,多选,问答式。单选还有其他项,需要手动填入内容。想要做成通用的,我不知道该如何设计数据库。特别是对问卷的统计分析,就更不知道该如何做了。 准备程序语言是:ASP + VBScript  数据库:ACCESS即可。 盼望有这方面经验的朋友指点迷津,不盛感激! 我的QQ:43180150 我的MSN :yang2jun@msn.com 诚心帮助我的朋友,http://www.wenkuai.com里选择任意一项产品,我以成本价给您。......

阅读全文(5962) | 评论:0

汉字转拼音,ASP轻松搞定.(2006-05-04 17:59:00)

摘要:但有些字没办法转,我试了个“轼”字就不可以。 <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><%Set d = CreateObject("Scripting.Dictionary")d.add "a",-20319d.add "ai",-20317d.add "an",-20304d.add "ang",-20295d.add "ao",-20292d.add "ba",-20283d.add "bai",-20265d.add "ban",-20257d.add "bang",-20242d.add "bao",-20230d.add "bei",-20051d.add "ben",-20036d.add "beng",-20032d.add "bi",-20026d.add "bian",-20002d.add "biao",-19990d.add "bie",-19986d.add "bin",-19982d.add "bing",-19976d.add "bo",-19805d.add "bu",-19784d.add "ca",-19775d.add "cai",-19774d.add "can",-19763d.add "cang",-19756d.add "cao",-19751d.add "ce",-19746d.add "ceng",-19741d.add "cha",-19739d.add "chai",-19728d.add "chan",-19725d.add "chang",-19715d.add "chao",-19540d.add "che",-19531d.add "chen",-19525d.add "cheng",-19515d.add "chi",-19500d.add "chong",-19484d.add "chou",-19479d.add "chu",-19467d.add "chuai",-19289d.add "chuan",-19288d.add "chuang",-19281d.add "chui",-19275d.add "chun",-19270d.add "chuo",-19263d.add "ci",-19261d.add "cong",-19249d......

阅读全文(2659) | 评论:0

ASP字符串函数示例(2006-04-29 17:13:00)

摘要:函数 语法 功能 Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。 Trim Trim(string) 将字符串前后的空格去掉 Ltrim Ltrim(string) 将字符串前面的空格去掉 Rtrim Rtrim(string) 将字符串后面的空格去掉 Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 Left Left(string,length) 从string字符串的左边取得length长度的字符串 Right Right(string,length) 从string字符串的右边取得length长度的字符串 LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1 InStr InStr(string1,string2[, compare]) 返回string1字符串在string2字符串中第一次出现的位置 Split Split(string1,delimiter[, count[, start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。 count 返回的子字符串数目,-1 指示返回所有子字符串。 start为 1 执行文本比较;如果为 0 或者省略执行二进制比较。  ......

阅读全文(2498) | 评论:0

ASP与数据库链接的几种方法(2006-04-15 17:31:00)

摘要:转载自:http://218.66.59.245/blog/blogview.asp?logID=15 一、MS Access 数据库1、OLE[推荐]Dim Conn,ConnStr,DBPathDBPath = "DataBase.mdb"ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "&Server.MapPath(DBPath)'当数据库设置过密码时用以下语句ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "& Server.MapPath(DBPath) &";Jet OLEDB:Database Password=Password"On Error Resume NextSet Conn = Server.CreateObject("ADODB.Connection")Conn.Open ConnStrIf Err Then    Err.Clear    Conn.Close    Set Conn = Nothing    Response.Write("数据库链接出错,请检查链接字符串。")    Response.End()Else    Response.Write("数据库链接成功!")End If2、ODBCDim Conn,ConnStr,DBPathDBPath = "DataBase.mdb"ConnStr="DRIVER={Microsoft&n......

阅读全文(4001) | 评论:0