| 动态Include文件的讨论 |
| 我们从一个案例谈起：
<%
'得到用户所在的省份
Dim Province
Province = Request.form("Province")
'下面显示这个省份相关的信息
%>
<!--#include virtual="/ Province/<%= Province%>"-->
你觉得上面的代码可以工作吗？不！简单地使用ASP来达到动态包含，你不能达到你想要的效果。为什么…… |
|
| 如何使replace方法不区分大小写？ |
| 被替换的文本的实际模式是通过 RegExp 对象的 Pattern 属性设置的。
Replace 方法返回 string1 的副本，其中的 RegExp.Pattern 文本已经被替换为 string2。如果没有找到匹配的文本，将
返回原来的 string1 的副本。
下面的例子说明了 Replace 方法的用法。
Function ReplaceTest(patrn, replStr)
Dim regEx, s…… |
|
| 如何處理資料庫中的Null |
| 對於初學者, 在處理資料庫中的 Null 資料型態是有一點麻煩的事, 在這篇文章文章中我們將談談 Null , 你將會了解到如何知道一個值是 Null , 哪些函數可以或不可以處理 Null
首先, 我們必須知道在 VBScript 中, Variant 是唯一的一種資料型態, 對於那些已經熟悉其他語言的程式開發者, 可能會感到有點不習慣。 使用 Varian…… |
|
| 全面考察“禁用浏览器后退按钮” |
| 浏览器的后退按钮使得我们能够方便地返回以前访问过的页面，它无疑非常有用。但有时候我们不得不关闭这个功能，以
防止用户打乱预定的页面访问次序。本文介绍网络上可找到的各种禁用浏览器后退按钮方案，分析它们各自的优缺点和适
用场合。
一、概述
曾经有许多人问起，“怎样才能‘禁用’浏览器的后退按钮？”…… |
|
| 没有定义变量的问题 |
| 在ASP有用Dim预先定义变量是非常好的习惯，可我碰到这样的问题：
用存储过程取出一个结果集，其中一个字段为smallDate类型，缺省值为Null，这里为'2001-4-4'，做如下判断：
...
<Table>
...
</Table>
<%
IF Not IsNull(oRs("E_DT")) Then
%>
<Table>
...
</Table>
<%
…… |
|
| 利用global.asp定时执行ASP |
| Using the global.asa to schedule ASP code execution.
Have you ever had some asp code that needed to execute every once in a while but, you just didn't know how to do it.
There is a solution that doesn't involve running any scheduling or scripting software on the server and is actually very easy …… |
|
| 利用On Error Resume Next来验证日期的输入(ASP 3.0) |
| 刚才又有人问到用JavaScript来验证日期，回想起自己写了一堆函数来验证日期，而且还没有涉及到闰年的问题，近来看到ASP 3.0关于On Error Resume Next的用法，灵机一动，嘿嘿……。真爽呀！
<%
Option Explicit
Dim strDate '记录输入的日期，字符型
Dim datDate '测试输入的日期是否正确，日期…… |
|
| 随机产生用户密码(good) |
| 说明：通过随机产生密码，然后将密码EMail给注册用户，你可以确认用户的EMail填写是否正确。自动产生的密码往往安全性更高，同时，你可以过滤那些无效的用户。
把下面的代码保存为random.asp文件：
<%
Sub StrRandomize(strSeed)
Dim i, nSeed
nSeed = CLng(0)
…… |
|
| 防止使用者按上一頁按鈕 |
| 討論區上常有網友問到這個問題, 如何防止使用者按回上一頁按鈕, 為何會問這一個問題? 應該通常是在防止使用者重複執行一個應用程式, 例如資料庫的新增, 如果使用者按了回上一頁, 有可能會造成重複新增資料, 今天這篇文章就要介紹如何 "盡可能" 的防止使用者按回上一頁
伺服端防止快取
首先來看看伺服端的方法, ASP …… |
|
| 如何避免重复定义数组 |
| 当我们在使用dim时，避免重新定义数组。因为你可能要用redim去重新定义数
组的大小。至于要做这样的操作的话，如果你的机器内存不是很大，那么最好在
一开始就考虑到最坏的打算去设置数组的长度或者设置最佳状态时的长度，在非
常必要时才使用redim。当然这样并不意味着要去增加内存，如果你不是很需要的
话。
…… |
|
| 如何检测备注字段的字节数 |
| 视服务器操作系统语种不同,而采取不同的方法:
1.E文下,len(rs("field")),就行了.len("中文abc")=7
2.Z文下,复杂一点,len("中文abc")=5
lenB("中文abc")=10,所以需要自己写程序判断其长度.
function strLen(str)
dim i,l,t,c
l=len(str)
t=l
for i=1 to l
c=asc(mid(str,i,1))
if c<0 the…… |
|
| ShowModalDialog的具体用法 |
| 应用背景：
需要打开一个子窗体，将需要修改的数据传到子窗体，然后将子窗体中修改过的数据，传回父窗体。（父窗体不能被刷新）
例如：父窗体只供用户查看，子窗体用于修改。
方法：
父窗体：
dim xxx '返回值
dim yyy '传到子窗体的参数
var xxx = ShowModalDialog('xxx.asp','yyy','…… |
|
| 一种效率极高的分类算法 |
| 分类算法要解决的问题
在网站建设中，分类算法的应用非常的普遍。在设计一个电子商店时，要涉及到商品分类；在设计发布系统时，要涉及到栏目或者频道分类；在设计软件下载这样的程序时，要涉及到软件的分类；如此等等。可以说，分类是一个很普遍的问题。
我常常面试一些程序员，而且我几乎毫无例外地要问他们一些关于分…… |
|
| 几个常用的小函数2 |
| //opt1 小数 opt2 负数
//当opt2为1时检查num是否是负数
//当opt1为1时检查num是否是小数
//返回1是正确的，0是错误的
function chknbr(num,opt1,opt2)
{
var i=num.length;
var staus;
//staus用于记录.的个数
status=0;
if ((opt2!=1) && (num.charAt(0)=='-'))
{
//alert…… |
|
| 几个常用的小函数 |
| //函数名：chkemail
//功能介绍：检查是否为Email Address
//参数说明：要检查的字符串
//返回值：0：不是 1：是
function chkemail(a)
{ var i=a.length;
var temp = a.indexOf('@');
var tempd = a.indexOf('.');
if (temp > 1) {
if ((i-temp) > 3){
…… |
|
| 多种屏蔽浏览器的后退按钮的方法 |
| I have had a lot of people ask, "How to I 慸isable?the back button?" or, "How do I prevent a user from
clicking the back button and going back to the previous screen?" In fact, this is one of the most commonly
asked questions on the ASPMessageboard and, sadly, the answer is quite simple: You CAN…… |
|
| 聊天室关键技术[用户断线]处理 |
|
在编聊天室时，处理用户断线是一个刺手的问题，特别是放到免费网站上，如果一味地靠global.asa，什么时候触发
session_onend,application_onend，都是一个不确定的数字，在设计时，合理地安排会带来意想不到的好处。
那么有什么最简便办法处理用户断线呢？
笔者经过试验，有了以下的方法：
聊天室用…… |
|
| 一段返回随机记录的代码 |
| 很久没用ACCESS了，只是看到经常碰到有人问如何返回随机记录的问题，所以就贴了上来，随便看看。
<!--#include virtual="/adovbs.inc"-->
<%
Dim objConn
Dim objRst
Dim strSQL
Dim strConnection
Dim str
Dim str1
Dim cnt
Dim cnt1
Dim rndMax
Dim RndN…… |
|
| 用err.raise自定义错误信息 |
| 我想大多数的人在编写ASP程序的时候，都碰到过类似的错误信息：
Error Number -> -2147467259
Error Source -> Microsoft OLE DB Provider for ODBC Drivers
Error Desc -> [Microsoft][ODBC Driver Manager] Data source name not found and no default driver
可时间上，这个错误信息对我们并不…… |
|
| 一个在vbscript中读取cookie的程序函数 |
| function cookievalue(pcook)
lhowlong=len(pcook)
lwhereis=instr(document.cookie,pcook)
if lwhereis=0 then
cookievalue=false
else
lstartpos=len(document.cookie)-lwhereis-lhowlong
lstartstring=right(document.cookie,lstartpos)
do
lchar=left(lstartstring,1)
if lchar=";" then
cookievalue=len…… |
|
| « ‹ [1][2][3][4][5][6] › » 20条/页 共119条 |
