logang - Donet

替换网页内容的代码

2007-02-10T20:09:42+08:00

网站设计制作规范

2007-01-11T10:34:29+08:00

总论
本规范既是一个网站开发规范,并不是一个一成不变的必须严格遵守的条文，特殊情况下要灵活运用，做一定的变通。但是，请大家千万不要随意更改规范。如果有任何问题，请及时与项目负责人沟通。
主目录下应有应该包含的文件
/xx需求文档    xx为该网站的中文名称，需求文档下应包含需求说明文档和客户提供的所以资料以及修改意见如果修改意见是文本形式就用修改意见20070110.txt 命名如果还包含其他资料就加个文件夹修改意见20070110 在交到美工之前，网站栏目、主色调、网站的分辨率（即宽屏还是窄屏）三者缺一不可。
/设计资料      设计资料下应该包含美工设计整个网站的所有图形，flash和文本资料，便于存档和以后修改网站内容
/images         切图图片文件夹,除了图片外还应包含某些可能需要修改以及程序员后面要用到的图片文件留存psd或png格式图片，最好以相同的名字命名，扩展名不同
/main.css        网站使用统一风格的主样式表文件
/help         目录,存放说明文件。说明文件包括：目录说明、文件列表说明、存放位置、文件名称、功能及处理逻辑描述、所涉及的库表、调用关系。
数据库说明：数据库位置、空间分配要求、表设计、关系设计、视图设计、存储过程设计等。
▲ 静态页面制作注意事项

一、制作常规要求

 主要页面要写企业（网站名称）名称+栏目名称（主页要写上企业[或网站]中英文名称,没有英文就不写英文）
 主要页面meta字段便于搜索引擎查找。
 尽量使用广泛支持的技术。以最流行的浏览器的最普及版本为标准，同时照顾低版本浏览器。
 不使用过大的图片、动画、声音.不使用过长的滚屏
 及时删除无用文件，防止无谓的下载速度减慢
 由于server的linux系统，严格区分文件大小写!所有文件全部以小写字母命名，包括图形文件.禁止用中文作文件名。
 在1024X768分辩率下应在浏览器中不出现横向的流动条；
 通常情况下页面应以居中为主，如有特殊要求可以设置居顶、居左；

二、文件命名规则

 首页面必须以“index.htm 、index.asp命名的文件。
 除非有特殊情况，目录、文件的名称全部用小写英文字母、数字、下划线的组合，其中不得包含汉字、空格和特殊字符；目录名应以英文、拼音为主(尽量不要使用几个字母的拼音简写)。尽量用一些大家都能看懂的词汇。使得你自己和工作组的每一个成员能够方便的理解每一个文件的意义。

图片的命名原则遵循以下几条规范：名称分为头尾两两部分，用下划线隔开。
头部分表示此图片的大类性质，例如广告、标志、菜单、按钮等等。
一般来说:
放置在页面顶部的广告、装饰图案等长方形的图片我们取名：banner
标志性的图片我们取名为：logo
在页面上位置不固定并且带有链接的小图片我们取名为button
在页面上某一个位置连续出现，性质相同的链接栏目的图片我们取名：menu
装饰用的照片我们取名：pic
不带链接表示标题的图片我们取名：title
依照此原则类推。
尾部分用来表示图片的具体含义。
下面是几个样例，大家应该能够一眼看明白图片的意义：
banner_sohu.gif banner_sina.gif menu_aboutus.gif menu_job.gif title_news.gif logo_police.gif logo_national.gif pic_people.jpg pic_hill.jpg

三、页面制作规则

1．在排布表格之前，请大家一定要好好思考一个最佳的方案，表格的嵌套尽量控制在三层以内，并且应该尽量避免两个标记，经验表明，这两个标记会带来许多麻烦。外层表格用绝对像素,内层表格尽量用相对（百分比）像素，以免浏览器分辨率不同时表格产生变形。一个网页要尽量避免用整个一张大表格，所有的内容都嵌套在这个大表格之内，因为浏览器在解释页面的元素时，是以表格为单位逐一显示，如果一张网页是嵌套在一个大表格之内，那么很可能造成的后果就是，当浏览者敲入网址，他要先面对一片空白很长时间，然后所有的网页内容同时出现。如果必须这样做，请使用标记，以便能够使这个大表格分块显示。原则上最少三个表格在表格之外尽量不用div对齐方式，应用表格自身的对齐方式。

2． CSS定义规范及CSS 文件的格式样例代码：参考同目录下的main.css
body { font-family: "宋体"; font-size:12px; color: #000000; margin-top: 0px; margin-right:0px; margin-bottom: 0px; margin-left: 0px}
table { font-family: "宋体"; font-size: 12px; line-height: 20px; color: #000000}
a:link { font-size: 12px; color: #FFFFFF; text-decoration: none}
a:visited { font-size: 12px; color: #99FFFF; text-decoration: none}
a:hover { font-size: 12px; color: #FF9900; text-decoration: none}
a:active { font-size:12px; color: #FF9900; text-decoration: none}
为了保证不同浏览器上字号保持一致，字号建议用点数pt和像素px来定义，一般使用中文宋体的12px和11pt，px一般使用中文宋体12px 和14.7px 这是经过优化的字号，黑体字或者宋体字加粗时，一般选用11pt和14.7px 的字号比较合适，尽量不要使用内部样式。
3．图片采用 gif , jpg 压缩格式(除需要显示特殊效果，尽量不要使用其他格式)，以减小页面下载数据量。每幅图片要有本图片的说明文字(alt=”说明文字”)这样如果图片不能正常显示，也可知道图片处代表什么意思。标记要增加width, height，以免图像不能正常显示时，出现页面混乱现象。
4．如页面采用动画活跃网页，须避免动画过大，尽量减少用户浏览等待时间。整页用到flash动画，要考虑到flash与页面的融合统一。Flash在浏览器中的单击激活控件的问题解决办法参考同目录下的FlashActiveX
5．每一相对独立的栏目首页一般也要求在40K容量以内，如特殊要求也不得超过60K；每个网页（本网首页除外）都要有返回主页和返回上级的图标或文字链接。
6．链接使用相对路径，尽量不使用绝对路径。如：/index.htm代表根目录下
7．网页制作字体要求使用国家标准简化字。

▲ 程序开发注意事项
1．网站系统要连接一个数据库(sql),所以要连接数据库，但不允许建立odbc数据源，不允许作多个头包含连接，整个系统只有一个，以便将来更改数据库密码时很方便的更改本系统，同时，移植也很方便。
2 头包含要做成例如*.asp的文件，这样用户不会发现密码及数据库，如果有acess数据库，扩展名一定要改成例如*.asp的样子，以便保护数据。
3 所有的各个子模块，都要有一个readme.asp（readme.txt----改成readme.asp，什么都不显示）文件，里面详细叙述本子模块用到的表，表结构，每个字段的意义及大小，SQL 建表脚本语言（用SQL 工具导出），每个程序文件的功能。
4 建表要有一定的意义，其字段也要有意义，如4967班的表学生，表名：table_4967_student字段：姓名,年龄table_4967_student_name，table_4967_student_age等等。同时，要有5个人上的扩展字段，以便将来扩充功能。
5 要有注释，以便维护。删除测试时候的无用代码，使程序清晰明了。重要位置加注释。
6 要用相对路径，坚决禁止用绝对路径。
7 后台管理程序要整合到一个页面上，而且要有权限，只能是有权限的用户登录后才能进行系统管理。
8 不要开设不必要的session变量，以免浪费资源，同时，能一次性用sql语句解决的问题就用sql语句，避免多次进行数据库检索，反馈，再检索等等，以免影响速度，致使大量的时间浪费在网络连接上。
9 程序开发时不要用已投入运行的网站进行测试，请自己搭建环境或申请环境。
10 要有错误捕获处理，提醒用户如何操作造成错误。
11 删除信息时要有确认，毕竟是删除，确认后再行删除。
12 各个模块间要条例分明，不要混乱一片。每个模块要有自己的目录（放到主目录下）。
13 该用js验证合法的就要验证，坚决避免服务器端进行验证，以免加大服务器负担，同时，影响网页反应的速度。
14 编程人员测试程序时要用上界限外值，合法值，下界限外值进行测试。
15 绝对禁止使用触发器，存储过程。
16 如果整个网站系统都用到同一个变量或常量，请仿照c语言中的常量定义，以便维护上的方便。
17 显示数据库信息时候，应考虑到段落层次，各标点符号的正常显示，记录比较多可以考虑分页，避免过长的页面出现。
18 所有模块内部测试通过后再交往上级进行测试及验收。
19 所有的功能完成后，要进行整合测试，后台管理程序要放到一起，也形成一个后台管理型网站，目的：操作简洁方便。

网页设计制作规范点击下载此文件

http/1.1 500 server error错误的解决方法

2006-12-21T21:10:56+08:00

可能是下面的三种情况，原因是这些组件可能受到了破坏，依次在运行里面输入试试
regsvr32 %windir%/system32/jscript.dll
regsvr32 %windir%/system32/vbscript.dll
C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_regiis.exe -i
dotnet版本号现在有三种，你装的哪一个就改成哪一个
v1.1.4322
v1.0.3705
v2.0.50727

javascript 四舍五入函数

2006-09-23T12:17:39+08:00

如何用javascript做一个灵活四舍五入的函数，要求输入如12.987等，点击按钮后自动四舍五入成12.99,若是输入12.99，四舍五入后就成为13，另外，最好还能控制保留小数位数，
server 如12.7686，保留三位小数位就是12.769，保留两位小数位就是12.77，如此如此，请赐教！！

---------------------------------------------------------------

function  cheng(num,n)
{var  dd=1;
var  tempnum;
for(i=0;i{
dd*=10;
}
tempnum=num*dd;
tempnum=Math.round(tempnum);
alert(tempnum/dd);
}
里面的两个参数：num就是要转换的数据。n为要转换的位数
---------------------------------------------------------------

/*
*    ForDight(Dight,How):数值格式化函数，Dight要
*    格式化的  数字，How要保留的小数位数。
*/
function  ForDight(Dight,How)
{
           Dight  =  Math.round  (Dight*Math.pow(10,How))/Math.pow(10,How);
           return  Dight;
}
alert(ForDight(12345.67890,2));

图片按钮提交

2006-08-25T21:17:24+08:00

代替submit按钮的图片代码格式是
＜input type="image" name="..." src="..." onClick="document.formName.submit()"＞

代替reset按钮的代码图片格式是
＜img border=0 src="..."＞
注：这里的formName是表单的name属性值。

XP 下IIS 开机自动运行

2006-08-15T22:04:44+08:00

在服务里，把下面两个服务设置为自动即可：
1. IIS Admin
2. World Wide Web Publishing

javascript数据类型转换

2006-08-15T21:58:39+08:00

parseFloat 转换成浮点数
parseInt 转换成整数.

这两个函数都有些容错性的,比如"123abc"会变成123.
如果楼主希望更准确一些,其实可以判断一下,然后用eval,像这样

不过也可以使用这样的方法:
var a = "234" ;
a = a.replace(/(^[\\s]*)|([\\s]*$)/g, "");
if( a !="" && !isNaN( a ) )
{//如果是数字
a = eval( a )
}
else
{//如果不是数字
a = null
}

javascript有两种数据类型的转换方法：一种是将整个值从一种类型转换为另一种数据类型（称作基本数据类型转换），另一种方法是从一个值中提取另一种类型的值，并完成转换工作。

基本数据类型转换的三种方法：

1.转换为字符型：String(); 例：String(678)的结果为"678"
2.转换为数值型：Number(); 例：Number("678")的结果为678
3.转换为布尔型：Boolean(); 例：Boolean("aaa")的结果为true

从一个值中提取另一种类型的值的方法：

1.提取字符串中的整数：parseInt(); 例：parseInt("123zhang")的结果为123
2.提取字符串中的浮点数：parseFloat(); 例：parseFloat("0.55zhang")的结果为0.55
3.执行用字符串表示的一段javascript代码：eval(); 例：zhang=eval("1+1")的结果zhang=2

JavaScript判断日期、数字、整数和特殊字符

2006-08-15T21:57:06+08:00

如何在用一个程序检测所输入的内容是否合法，以下是本人自己编写的一个程序对日期、数字、整数和特殊字符进行了判断同时还可判断是正数还是负数(对数值类和整数而言)

LogicalValue:用于判断对象的值是否符合条件，现已提供的选择有：
integer：整型，还可判断正整型和负整型
number ：数值型，同样可判断正负
date ：日期型，可支持以自定义分隔符的日期格式，缺省是以´-´为分隔符
string ：判断一个字符串包括或不包括某些字符
返回值：
true或false

参数：
ObjStr ：对象标识符——对象名；
ObjType：对象类型(´integer´,´number´,´date´,´string´之一)

其他说明：
当对象值为空时，则返回错误。

Author:PPDJ

例子：
example 1:要求检验输入框text1的输入数据是否是“整型”数据，若不是，则提示
if (!LogicalValue(´text1´,´integer´)) alert(´Error: Your must input a integer number´);
example 2:要求检验输入框text1的输入数据是否是“正整型”数据，若不是，则提示
if (!LogicalValue(´text1´,´integer´,´+´)) alert(´Error: Your must input a positive integer number´);
example 3:要求检验输入框text1的输入数据是否是“负整型”数据，若不是，则提示
if (!LogicalValue(´text1´,´integer´,´-´)) alert(´Error: Your must input a negative integer number´);
exmaple 4:要求检验输入框text1的输入数据是否是数值，若不是，则提示
if (!LogicalValue(´text1´,´number´)) alert(´Error: Your must input a number´);
exmaple 5:要求检验输入框text1的输入数据是否是“正”数值，若不是，则提示
if (!LogicalValue(´text1´,´number´,´+´)) alert(´Error: Your must input a number´);
exmaple 6:要求检验输入框text1的输入数据是否是“负”数值，若不是，则提示
if (!LogicalValue(´text1´,´number´,´-´)) alert(´Error: Your must input a number´);
example 7:要求检验输入框text1的输入数据是否是日期型，若不是，则提示
if (!LogicalValue(´text1´,´date´)) alert(´Error: Your must input a logical date value´);
若它的分隔符为A，“A”是一个变量，如常用的´-´和´/´，则用如下语法
if (!LogicalValue(´text1´,´date´,A)) alert(´Error: Your must input a logical date value´);
或当分隔符为´/´时
if (!LogicalValue(´text1´,´date´,´/´)) alert(´Error: Your must input a logical date value´);
当分隔符为´-´时，可不要参数´-´，可带上
example 8:要求检验输入框text1的输入表示颜色的字符串是否合理，若不合理，则提示
if (!LogicalValue(´text1´,´string´,´0123456789ABCDEFabcdef´)) alert(´Error: Your must input a logical color value´);
example 9:要求检验输入框text1的输入表示密码的字符串是否不含“´"@#$%&^*”这些字符，若含有，则提示
if (!LogicalValue(´text1´,´string´,´´"@#$%&^*´,false)) alert(´Error: Your password can not contain ´"@#$%&^*´);
其中false表示不包含有某些字符，true表示必须是哪些字符，缺省值为true

引用:

< script language="javascript">
< !--
function LogicalValue(ObjStr,ObjType)
{
var str=´´;
if ((ObjStr==null) || (ObjStr==´´) || ObjType==null)
{
alert(´函数LogicalValue缺少参数´);
return false;
}
var obj = document.all(ObjStr);
if (obj.value==´´) return false;
for (var i=2;i{
if (str!=´´)
str += ´,´;
str += ´arguments[´+i+´]´;
}
str=(str==´´?´obj.value´:´obj.value,´+str);
var temp=ObjType.toLowerCase();
if (temp==´integer´)
{
return eval(´IsInteger(´+str+´)´);
}
else if (temp==´number´)
{
return eval(´IsNumber(´+str+´)´);
}
else if (temp==´string´)
{
return eval(´SpecialString(´+str+´)´);
}
else if (temp==´date´)
{
return eval(´IsDate(´+str+´)´);
}
else
{
alert(´"´+temp+´"类型在现在版本中未提供´);
return false;
}
}
//-->
< /script>

IsInteger: 用于判断一个数字型字符串是否为整形，
还可判断是否是正整数或负整数，返回值为true或false
string: 需要判断的字符串
sign: 若要判断是正负数是使用，是正用´+´，负´-´，不用则表示不作判断
Author: PPDJ
sample:
var a = ´123´;
if (IsInteger(a))
{
alert(´a is a integer´);
}
if (IsInteger(a,´+´))
{
alert(a is a positive integer);
}
if (IsInteger(a,´-´))
{
alert(´a is a negative integer´);
}

引用:

< script language="javascript">
< !--
function IsInteger(string ,sign)
{
var integer;
if ((sign!=null) && (sign!=´-´) && (sign!=´+´))
{
alert(´IsInter(string,sign)的参数出错： sign为null或"-"或"+"´);
return false;
}
integer = parseInt(string);
if (isNaN(integer))
{
return false;
}
else if (integer.toString().length==string.length)
{
if ((sign==null) || (sign==´-´ && integer<0) || (sign==´+´ && integer>0))
{
return true;
}
else
return false;
}
else
return false;
}
//-->
< /script>

IsDate: 用于判断一个字符串是否是日期格式的字符串

返回值：
true或false

参数：
DateString：需要判断的字符串
Dilimeter ：日期的分隔符，缺省值为´-´

Author: PPDJ
sample:
var date = ´1999-1-2´;
if (IsDate(date))
{
alert(´You see, the default separator is "-");
}
date = ´1999/1/2";
if (IsDate(date,´/´))
{
alert(´The date´s separator is "/");
}

引用:

< script language="javascript">
< !--
function IsDate(DateString , Dilimeter)
{
if (DateString==null) return false;
if (Dilimeter==´´ || Dilimeter==null)
Dilimeter = ´-´;
var tempy=´´;
var tempm=´´;
var tempd=´´;
var tempArray;
if (DateString.length<8 && DateString.length>10)
return false;
tempArray = DateString.split(Dilimeter);
if (tempArray.length!=3)
return false;
if (tempArray[0].length==4)
{
tempy = tempArray[0];
tempd = tempArray[2];
}
else
{
tempy = tempArray[2];
tempd = tempArray[1];
}
tempm = tempArray[1];
var tDateString = tempy + ´/´+tempm + ´/´+tempd+´ 8:0:0´;//加八小时是因为我们处于东八区
var tempDate = new Date(tDateString);
if (isNaN(tempDate))
return false;
if (((tempDate.getUTCFullYear()).toString()==tempy) && (tempDate.getMonth()==parseInt(tempm)-1) && (tempDate.getDate()==parseInt(tempd)))
{
return true;
}
else
{
return false;
}
}
//-->
< /script>

IsNumber: 用于判断一个数字型字符串是否为数值型，
还可判断是否是正数或负数，返回值为true或false
string: 需要判断的字符串
sign: 若要判断是正负数是使用，是正用´+´，负´-´，不用则表示不作判断
Author: PPDJ
sample:
var a = ´123´;
if (IsNumber(a))
{
alert(´a is a number´);
}
if (IsNumber(a,´+´))
{
alert(a is a positive number);
}
if (IsNumber(a,´-´))
{
alert(´a is a negative number´);
}

引用:

< script language="javascript">
< !--
function IsNumber(string,sign)
{
var number;
if (string==null) return false;
if ((sign!=null) && (sign!=´-´) && (sign!=´+´))
{
alert(´IsNumber(string,sign)的参数出错： sign为null或"-"或"+"´);
return false;
}
number = new Number(string);
if (isNaN(number))
{
return false;
}
else if ((sign==null) || (sign==´-´ && number<0) || (sign==´+´ && number>0))
{
return true;
}
else
return false;
}
//-->
< /script>

SpecialString: 用于判断一个字符串是否含有或不含有某些字符

返回值：
true或false

参数：
string ：需要判断的字符串
compare ：比较的字符串(基准字符串)
BelongOrNot： true或false，“true”表示string的每一个字符都包含在compare中，
“false”表示string的每一个字符都不包含在compare中

Author: PPDJ
sample1:
var str = ´123G´;
if (SpecialString(str,´1234567890´))
{
alert(´Yes, All the letter of the string in ´1234567890´´);
}
else
{
alert(´No, one or more letters of the string not in ´1234567890´´);
}
结果执行的是else部分
sample2:
var password = ´1234´;
if (!SpecialString(password,´´"@#$%´,false))
{
alert(´Yes, The password is correct.´);
}
else
{
alert(´No, The password is contain one or more letters of ´"@#$%´´);
}
结果执行的是else部分

引用:

< script language="javascript">
< !--
function SpecialString(string,compare,BelongOrNot)
{
if ((string==null) || (compare==null) || ((BelongOrNot!=null) && (BelongOrNot!=true) && (BelongOrNot!=false)))
{
alert(´function SpecialString(string,compare,BelongOrNot)参数错误´);
return false;
}
if (BelongOrNot==null || BelongOrNot==true)
{
for (var i=0;i{
if (compare.indexOf(string.charAt(i))==-1)
return false
}
return true;
}
else
{
for (var i=0;i{
if (compare.indexOf(string.charAt(i))!=-1)
return false
}
return true;
}
}
//-->
< /script>

2003系统上传文件不能超过200K的解决方案

2005-10-09T14:31:08+08:00

    Windows2003系统下，上传较大的文件时，出现“Request 对象错误 'ASP 0104 : 80004005'”错误。
    更改win2003的IIS 6.0对asp的上传文件大小为200k限制，aspx的上传程序没有影响。在IIS6.0中，默认设置是特别严格和安全的，最大只能传送 204,800 个字节，这样可以最大限度地减少因以前太宽松的超时和限制而造成的攻击。IIS 6 出于安全考虑, 默认最大请求是200K(也即最大提交数据限额为200KByte，204800Byte)。（在 IIS 6.0 之前的版本中无此限制）

    解决方案

    办法一：

    第一步：修改IIS设置，允许直接编辑配置数据库。先打开，Internet信息服务，如下图：
screen.width-500)this.style.width=screen.width-500;" />

    第二步：先在服务里关闭iis admin service服务，找到windows\system32\inesrv\下的metabase.xml, 打开，找到ASPMaxRequestEntityAllowed 把他修改为需要的值，默认为204800，即200K，如把它修改为51200000（50M）。
    然后重启iis admin service服务。

    办法二：

  新建一个文本文件，内容如下：

  '----------------------------------------------------

  set providerObj=GetObject("winmgmts:/root/MicrosoftIISv2")

  set vdirObj=providerObj.get("IIsWebVirtualDirSetting='W3SVC/1/ROOT'")

  WScript.Echo "Before: " & vdirObj.AspMaxRequestEntityAllowed

  vdirObj.AspMaxRequestEntityAllowed=51200000

  vdirObj.Put_()

  WScript.Echo "Now: " & vdirObj.AspMaxRequestEntityAllowed

  '----------------------------------------------------

  然后保存为.vbs文件，如：vf.vbs

  然后在命令行模式下，执行 cscript 文件路径及文件名，如：

  cscript d:\vf.vbs

  这样ASP上传大小就更改为了上面设置的：51200000字节 (50兆)

关于win2003上传限制解决方案的补充说明

　　到微软站点载了IIS6 Resource Kit Tools（http://www.microsoft.com/downloads/details.aspx?FamilyID=56FC92EE-A71A-4C73-B628-ADE629C89499&displaylang=en），安装后利用Metabase Explorer修改了(local)\LM\W3SVC\AspMaxRequestEntityAllowed属性（默认为200K=204800），修改为1G就是了；同时修改了AspScriptTimeout属性调整下时限，就可以上传大文件了。

此时发现AspMaxRequestEntityAllowed丢之，点右键添加new属性为asp，设置自己需要的大小，然后确定即可～～～

详细操作过程图片：

第一步：到微软站点载了IIS6 Resource Kit Tools后，双击进行安装，出现如下界面：

第二步：依次打开：开始－程序菜单－IIS Resources－Metabase Explorer，运行Metabase Explorer。

第三步：在出现的窗口中填写相关信息：

第四步：在程序窗口中选择(local)\LM\W3SVC

第五步：修改(local)\LM\W3SVC\AspMaxRequestEntityAllowed属性，修改为较大的值，如1G：

补充：如果你按照“动易系统在Win2003下不能上传附件应该如何解决？ ”的方法修改了，那么请继续下面步骤：
第一步：

第二步：此时会出现aspmaxrequestentityallowed对象，鼠标双击。出现：

第三步：点选：general，进行如下设置。

ASP实例:6行代码实现无组件上传

2005-10-05T20:49:11+08:00

目前有很多无组件上传类，我大概看了一下，大多写的相当复杂，有的居然还只能传文本
  最关键的是没有10行代码以下的：）
  我花了一个晚上时间研究了一下ADODB.Stream，并且用了6行代码实现了无组件上传：

  strFileName = Request.QueryString("file1")
  Set objStream = Server.CreateObject("ADODB.Stream")
  objStream.Type = 1 ' adTypeBinary
  objStream.Open
  objStream.LoadFromFile strFileName
  objStream.SaveToFile Server."123_onweb.gif",2

  使用方法：

  把上面的代码写成upload.asp
  在浏览器里面输入：
  http://XXX/upload.asp?file1=c:\上传文件\123.gif
  XXX为你的主机地址
  执行完后你会看到你的目录下面多了一个123_onweb.gif
  他就是你要文件拉！！！！

  根据原理我们可以扩展以下代码：
  upload.asp文件
  <%
  Function GetFileName(ByVal strFile)
  If strFile <> "" Then
   GetFileName = mid(strFile,InStrRev(strFile, "\")+1)
  Else
   GetFileName = ""
  End If
  End  function

  strFileName = Request.Form("file1")
  Set objStream = Server.CreateObject("ADODB.Stream")
  objStream.Type = 1 ' adTypeBinary
  objStream.Open
  objStream.LoadFromFile strFileName
  objStream.SaveToFile Server.MapPath(GetFileName(strFileName)),2
  objStream.Close
  %>

  upload.htm文件

操作必须使用一个可更新的查询

2005-10-05T20:47:13+08:00

错误“操作必须使用一个可更新的查询”原因及解决办法

Microsoft JET Database Engine (0x80004005)
操作必须使用一个可更新的查询。

原因：
有几个主要的错误原因：
这个错误发生在当你的程序试图执行更新数据库或其它类似操作时。这是因为
ADO由于以下的几个原因而不能够写数据库造成的。
1。最普遍的原因是匿名用户帐号(IUSR_MACHINE)对该数据库文件没有写权限。
要解决这个问题，在管理器中调整数据库文件的属性，让匿名用户有正确的权限。
当使用ACCESS数据库时，不仅要给文件写的权限，还要给该目录写的权限，因为
Jet需要在该目录建立一个.ldb文件。
2。第二个原因是数据库没有使用正确的模式打开。应该使用下面的方法打开。
SQL = "Update Products Set UnitPrice = 2;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Mode = 3 '3 = adModeReadWrite
Conn.Open "myDSN"
Conn.Execute(SQL)
Conn.Close
注意默认的Mode是设置0(adModeUnknown),它是允许更新的。
3。还有可能是在ODBC管理器中将该DSN的只读选项选中。
4。你是在同时更新两个表中的字段，也会出现这个错误信息，解决办法是分开来更新
这两个表中各自字段。
5。当你使用了一个从低版本中（如ACCESS2.0,ACCESS7.0）载入到高版本(ACCESS 2000)
中的查询时，在执行这个查询是会出现该错误。

vbscrip常用函数

2005-09-29T18:33:51+08:00

1.数值型函数：

abs(num): 返回绝对值
sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负
hex(num): 返回十六进制值直接表示：&Hxx 最大8位
oct(num): 返回八进制值直接表示：&Oxx 最大8位
sqr(num): 返回平方根 num>0
int(num): 取整 int(99.8)=99; int(-99.2)=100
fix(num): 取整 fix(99.8)=99; fix(-99.2)=99
round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为近偶取整 round(3.25,1)=3.2
log(num): 取以e为底的对数 num>0
exp(n): 取e的n次幂通常用 num^n
sin(num): 三角函数，以弧度为值计算 (角度*Pai)/180=弧度 con(num); tan(num); atn(num)

2.字符串函数：

len(str)：计算字符串长度中文字符长度也计为一！
mid(str,起始字符,[读取长度])：截取字符串中间子字符串
left(str,nlen)：从左边起截取nlen长度子字符串
right(str,nlen)：从右边起截取nlen长度子字符串
Lcase(str)：字符串转成小写
Ucase(str)：字符串转成大写
trim(str)：去除字符串两端空格
Ltrim(str)：去除字符串左侧空格
Rtrim(str)：去除字符串右侧空格
replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串
注：默认值：起始字符 1；替代次数不限；比较方法区分大小写（0）
InStr([起始字符,]str,查找字符串[,比较方法])：检测是否包含子字符串可选参数需同时选返回起始位置
InStrRev(str,查找字符串[,起始字符][,比较方法])：反向检测是否包含子字符串返回起始位置
space(n)：构造n个空格的字符串
string(n,str)：构造由n个str第一个字符组成的字符串
StrReverse(str)：反转字符串
split(str,分割字符串[,次数][,比较方法])：以分割字符串为分割标志将字符串转为字符数组可选参数需同时选

3.数据类型转换函数：

Cint(str)：转换正数 True -1；False 0；日期距离1899/12/31天数；时间上午段 0；下午段 1；
Cstr(str)：日期输出格式 yyyy/mm/dd；时间输出格式 Am/Pm hh:mm:ss
Clng(str)：与Cin()类似
Cbool(num)：num不为零 True；反之 False
Cdate(str)：转换日期格式 0：#Am 12:00:00#；正数距离1899/12/31天数的日期；浮点数日期＋小数时间
Cbyte(num)：num<255 转换为字节
Csng(str)：转换为单精度数值
Cdbl(str)：转换为双精度数值
Ccur(str)：转换为现金格式

4.时间函数：

date：取系统当前日期
time：取系统当前时间
now：取系统当前时间及日期值 Datetime类型
timer：取当前时间距离零点秒值，计时器，可计算时间差
DateAdd(间隔单位,间隔值,日期)：推算相邻日期
DateDiff(间隔单位,日期一,日期二)：计算时间差日期二-日期一
Datepart(间隔单位,日期)：计算日期的间隔单位值
Dateserial(date)：输出日期值（按序列计算）
Timeserial(time)：输出时间值（按序列计算）
DateValue(datetime)：取出字符串中日期值
Timevalue(datetime)：取出字符串中时间值
weekday(date)：计算星期几
MonthName(date)：输出月分名
year(datetime)：截取年份
month(datetime)：截取月份
day(datetime)：截取日
hour(datetime)：截取小时
minute(datetime)：截取分钟
second(datetime)：截取秒

5.其它函数：

Array(unit,..)：动态生成数组
Asc(str)：输出字符串第一个字符的ASCII码
Chr(asc)：转换ASCII为字符 Enter：Chr(13)&Chr(10)
Filter(数组名称,关键字符串,[,包含][,比较方法])：
将字符串数组中含有关键字符串的元素存成新的数组（默认） [包含]为false则取不包含的元素
Join(ArrayName)：将数组中元素连成字符串
Ubound(ArrayName[,维数])：取得数组相应维数的上界
Lbound(ArrayName[,维数])：取得数组相应维数的下界一般为0
Randmize n：启动随机数种子
Rnd(n)：取得随机数，n>0或为空，取序列下一随机值，n<0，随机值相同，n=0，生产与上一随机值相同的数
取介于A和B之间的随机正数C，公式：C=Int((B-A+1)*Rnd+A) 条件（B>A）

子程序和自定义函数

Sub StrSubName Function StrFunName(arg[1],..)
子程序体函数体
Exit Sub 中途跳出 Exit Function 中途跳出
End Sub StrFunName＝Value 返回值
End Function
[call] StrSubName 引用子程序 Var=StrFunName(arg[1],..) 引用函数

子程序和自定义函数可以递归调用；

ASP六大对象常用语句示范：

Response：

Response.write StrVar/"String"：向网页写出参数值或字符串等同于在Html标记中嵌入<%=StrVar/"String"%>
Response.End：停止页面编译，并将已经编译内容输出到浏览器
Response.Buffer=True|False：页面编译时是否使用缓存的设置，一般在页面头部设置
Response.Flush：强制输出页面已编译部分内容
Response.Clear：将缓冲区内的数据清除
Response.Redirect URL：停止页面编译或输出，转载指定所需页面
Response.IsClientConnected：返回True|False，检测用户是否还处于连接状态
Response.Charset(CharsetName)：设置页面编码类型，即
Response.ContentType [= ContentType ]：设置页面文件类型，同上
Response.Expires [= number]：设置页面失效时间，单位分钟
Response.ExpiresAbsolute [= [date] [time]]：设置页面失效的绝对时间
Response.Status = StatusDescription：设置页面状态描述

Request：

Request("PassStrName")：读取网页传递值，包括表单及以？PassStrName＝value&PassStrName_n＝value_n形式
Request[.collection|property|method](variable)
Request.querystring("PassStrName")：读取Get方法传递的表单值和？PassStrName＝value
Request.QueryString(Varible)[(Index).Count]
Request.form("PassStrName")：读取Post方法传递的纯表单域的值
Request.Form(Parameter)[(Index).Count]
Request.ServerVaribles(Server Environment Variable)：读取客户端系统环境变量，详见参考
Request.BinaryRead(Count)：读取指定字节数的传送值
Request.TotalBytes：查询体的长度，以字节为单位，只读

注：同名表单如：CheckBox如有多项值，传递形式如右，StrName=value1,value2,...需要用Split函数分割各项值
Multiple的Select表单与CheckBox类似，TextArea的值可包含换行字符，用Replace转为
，以满足格式需要

Session：（用户全局变量）

Session("SesName")＝value：存储Session变量值，也可读取该值
Session("SesName")＝Empty：判断Session值是否存在的两种方法
IsEmpty(Session("SesName"))=True|False：判断Session值是否存在的两种方法
Session.TimeOut=num：设置Session变量的存在时效，单位分钟
Session.Abandon：清除所有Session变量值
Session.SessionID：Session变量的ID序列号，只读

Application：（应用程序全局变量）

Application("AppName")＝value：存储Application变量值，也可读取该值
Application("AppName")＝Empty：判断Application值是否存在的两种方法
IsEmpty(Application("AppName"))=True|False：判断Application值是否存在的两种方法
Application.Lock：Application变量值锁定，防止同时更改变量值
Application.UnLock：Application变量值解锁，允许更改变量值

注：Session与Application变量都可以用来存储数组和系统对象，引用方法是变量名相当于数组名而已，
但不能直接改变其值，需要借助临时数组修改值后，再赋给Session与Application变量

Global.asa文件的结构：<% @language="VBscript"%>
<% Sub Application_OnStart ...End Sub
Sub Application_OnEnd ... End Sub
Sub Session_OnStart ...End Sub
Sub Session_OnEnd ... End Sub%>

Server:

Server.MapPath("FileUrl")：映射文件名的服务器站点绝对地址，Path=Server.MapPath(./)可以得到虚拟目录根路径
Server.HtmlEncode("string")：转换为可以直接显示带Html格式的字符串，如：<,>等
Server.URLEncode( "string")：转换为浏览器地址编码
set Var＝Server.CreatObject("ObjName")：创建对象变量
Server.ScriptTimeout = NumSeconds：ASP程序页面执行时限，以秒为单位

Cookies: 存储在用户本机的临时变量，每个Cookie的最大字节4KB，最多可以有300个Cookie 1.2MB

Response.cookies("StrCookieName")＝value：存储Cookie变量值，也可读取该值
Response.cookies("StrCookieName")＝""：判断是否为空
Response.cookies("StrCookieName").Expires=Date：变量有效期，以天为单位，小于当前时间立即失效
Response.Cookies(Cookie[(key).Attribute])：标准语法

ObjectContext 控制ASP的事务处理

ObjectContext.OnTransactionAbort：由放弃的事务处理事件激发，在脚本完成处理后发生
ObjectContext.OnTransactionCommit：由成功的事务处理事件激发，在脚本完成处理后发生
ObjectContext.SetAbort：显式的放弃一次事务处理
ObjectContext.SetComplete：覆盖前面任何调用ObjectContext.SetAbort方法的调用
Msgbox "string"/StrName：VBscript提示框

表单的Onsubmit事件：在同一页面写入 Function FormName_onsubmit()..FormName_onsubmit＝True/False..end Function，
页面会在提交前先执行语句，并根据返回值判断是否完成提交任务。

数据库连接字符串举例：

Access2000：
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase\liuyan.mdb")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase\liuyan.mdb")&";Password=admin"
Recordset.Open "数据表名", conn, 2, 2

SqlServer2000：
conn.Open "Provider=SQLOLEDB.1;User ID=sa;Password=admin;Initial Catalog=pubs;Data Source=server\garlmrm"
conn.Open "provider=SQLOLEDB;data source=hyserver;uid=sa;pwd=;database=pubs"
Recordset.Open StrSQL, conn, 2, 2

Dbase：(?)
conn Open "Driver={Microsoft dBase Driver};SourceType=DB;SourceDB=" & Server.MapPath( "目录名" )
Recordset.Open StrSQL, conn, 2, 2

FoxBase：
conn Open "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" & Server.MapPath( "目录名" )
Recordset.Open DBF文件名或Select语句, conn, 2, 2
conn Open "Driver={Microsoft Visual FoxPro Driver};SourceType=DBC;SourceDB=" & Server.MapPath( "DBC数据库文件名" )
Recordset.Open DBF文件名或Select语句, conn, 2, 2

Excel：
conn Open "Driver={Microsoft Excel Driver (*.xls)};DBQ=" & Server.MapPath( "XLS文件名" )
Recordset.Open "Select * From ["&sheet&"$]",conn,2,2

注：使用DBF、DBC、Excel数据库，下面几点要注意：Excel数据库只能读取、增加记录、修改记录，但不能删除记录；
DBF、DBC可以读取记录、增加记录、删除记录、修改记录，但是在增加记录时，任何一个字段值都不能为空，由此
可看出局限性很大，所以尽可能地用MDB或SQL数据库。