梦想飞翔 - 2006

某些时候，心情很不好，我以为这个世界上要让我心情不好的东西无非两样：人、物！看起来很像废话，其实我本来就在费话，不过这些话是写给我自己看的，它只代表着我某一时刻的心情，而且它们已经成为过去或即将成为过去，记下来只不过是为了发一下挠骚，将来自己有机会再看到的话，可以回想起当初的那份心情与不快。我想其它人是不大可能看明白的。

与物：我比较实际的，但也不至于不切实际。

与人：无非就是沟通了，我觉得世间最大的痛苦不是大话西游里那段对白所讲的，孙大哥之所以那样说，不过也是因为他不了解自己不会沟通罢了，如若他们之间都达成完美的默契，我想结局就没有那么感人，周星星也不可能指望它挣大家的银子了。

我是个不善言辞的人，我是这样认为的。我不是不喜欢去沟通，而是不喜欢去做无谓的沟通，这决定了我这一辈子都做不了推销员或销售类的事情了。但我不认为我的理解能力是差到无可救药的地步，但偏偏会有人把我当小孩，当我不明理事，这还好，如果有人把你当白痴了，那你才郁闷！哎，估计我离那步不远了。

不过一直以来，我都并未真正踏入社会，很多时候，很羡慕那些在社会上滚打的同学朋友们，他们成长得好快，也越来越让我看到与他们之间的差距的存在。


心情不好，就这些了，其它的我写不出来。

经常看到类似/test.jsp?lookup之类的url，为此做了个测试，分别针对asp,asp.net,php和jsp，以下是结果：

Asp:
'test.asp Response.Write Request.QueryString()

打开:test.asp?lookup=ok,得到:lookup=ok

Asp.net
Response.Write(Request.QueryString[""]);//返回空 Response.Write(Request.QueryString[]);//报错

PHP
//test.php echo $_GET[];//报错，这是当然 echo $_GET[];返回Array，也是当然 echo $_GET[''];报错
即得到不结果。

JSP
//test.jsp out.print(request.getQueryString());
打开:test.jsp?lookup=ok,得到：lookup=ok

得出结论：test.exp?para的形式针对asp和jsp比较有效，php和asp.net好像不行，如果有高人得出不一致的结论，请告知我。

1. ASP与Access数据库连接：
<%@ language=VBscript%>
<%
dim conn,mdbfile
mdbfile=server.mappath("数据库名称.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver
(*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile
%>

2. ASP与SQL数据库连接：
<%@ language=VBscript%>
<%
dim conn
set conn=server.createobject("ADODB.connection")
con.open "PROVIDER=SQLOLEDB;DATA
SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称
%>

建立记录集对象：

set rs=server.createobject("adodb.recordset")
rs.open SQL语句,conn,3,2

3. SQL常用命令使用方法：
(1) 数据记录筛选：
sql="select * from 数据表 where 字段名=字段值 order by 字段名 [desc]"
sql="select * from 数据表 where 字段名 like '%字段值%' order by 字段名 [desc]"
sql="select top 10 * from 数据表 where 字段名 order by 字段名 [desc]"
sql="select * from 数据表 where 字段名 in ('值1','值2','值3')"
sql="select * from 数据表 where 字段名 between 值1 and 值2"

(2) 更新数据记录：
sql="update 数据表 set 字段名=字段值 where 条件表达式"
sql="update 数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式"

(3) 删除数据记录：
sql="delete from 数据表 where 条件表达式"
sql="delete from 数据表" (将数据表所有记录删除)

(4) 添加数据记录：
sql="insert into 数据表 (字段1,字段2,字段3 …) values (值1,值2,值3 …)"
sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表)

(5) 数据记录统计函数：
AVG(字段名) 得出一个表格栏平均值
COUNT(*¦字段名) 对数据行数的统计或对某一栏有值的数据行数统计
MAX(字段名) 取得一个表格栏最大的值
MIN(字段名) 取得一个表格栏最小的值
SUM(字段名) 把数据栏的值相加
引用以上函数的方法：
sql="select sum(字段名) as 别名 from 数据表 where 条件表达式"
set rs=conn.excute(sql)
用 rs("别名") 获取统的计值，其它函数运用同上。

(5) 数据表的建立和删除：
Create TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… )
例：Create TABLE tab01(name varchar(50),datetime default now())

Drop TABLE 数据表名称 (永久性删除一个数据表)
4. 记录集对象的方法：
rs.movenext 将记录指针从当前的位置向下移一行
rs.moveprevious 将记录指针从当前的位置向上移一行
rs.movefirst 将记录指针移到数据表第一行
rs.movelast 将记录指针移到数据表最后一行
rs.absoluteposition=N 将记录指针移到数据表第N行
rs.absolutepage=N 将记录指针移到第N页的第一行
rs.pagesize=N 设置每页为N条记录
rs.pagecount 根据 pagesize 的设置返回总页数
rs.recordcount 返回记录总数
rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否
rs.eof 返回记录指针是否超出数据表末端，true表示是，false为否
rs.delete 删除当前记录，但记录指针不会向下移动
rs.addnew 添加记录到数据表末端
rs.update 更新数据表记录
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
Recordset对象方法
Open方法
recordset.Open Source,ActiveConnection,CursorType,LockType,Options
Source
Recordset对象可以通过Source属性来连接Command对象。Source参数可以是一个Command对象名称、一段SQL命令、一个指定的数据表名称或是一个Stored
Procedure。假如省略这个参数，系统则采用Recordset对象的Source属性。

ActiveConnection
Recordset对象可以通过ActiveConnection属性来连接Connection对象。这里的ActiveConnection可以是一个Connection对象或是一串包含数据库连接信息（ConnectionString）的字符串参数。

CursorType
Recordset对象Open方法的CursorType参数表示将以什么样的游标类型启动数据，包括adOpenForwardOnly、adOpenKeyset、adOpenDynamic及adOpenStatic，分述如下：
--------------------------------------------------------------
常数 常数值 说明
-------------------------------------------------------------
adOpenForwardOnly 0 缺省值，启动一个只能向前移动的游标（Forward Only）。
adOpenKeyset 1 启动一个Keyset类型的游标。
adOpenDynamic 2 启动一个Dynamic类型的游标。
adOpenStatic 3 启动一个Static类型的游标。
-------------------------------------------------------------
以上几个游标类型将直接影响到Recordset对象所有的属性和方法，以下列表说明他们之间的区别。
-------------------------------------------------------------
Recordset属性 adOpenForwardOnly adOpenKeyset adOpenDynamic adOpenStatic
-------------------------------------------------------------
AbsolutePage 不支持 不支持 可读写 可读写
AbsolutePosition 不支持 不支持 可读写 可读写
ActiveConnection 可读写 可读写 可读写 可读写
BOF 只读 只读 只读 只读
Bookmark 不支持 不支持 可读写 可读写
CacheSize 可读写 可读写 可读写 可读写
CursorLocation 可读写 可读写 可读写 可读写
CursorType 可读写 可读写 可读写 可读写
EditMode 只读 只读 只读
只读
EOF 只读 只读 只读
只读
Filter 可读写 可读写 可读写 可读写
LockType 可读写 可读写 可读写 可读写
MarshalOptions 可读写 可读写 可读写 可读写
MaxRecords 可读写 可读写 可读写 可读写
PageCount 不支持 不支持 只读 只读
PageSize 可读写 可读写 可读写 可读写
RecordCount 不支持 不支持 只读 只读
Source 可读写 可读写 可读写 可读写
State 只读 只读 只读 只读
Status 只读 只读 只读 只读
AddNew 支持 支持 支持 支持
CancelBatch 支持 支持 支持 支持
CancelUpdate 支持 支持 支持 支持
Clone 不支持 不支持
Close 支持 支持 支持 支持
Delete 支持 支持 支持 支持
GetRows 支持 支持 支持 支持
Move 不支持 支持 支持 支持
MoveFirst 支持 支持 支持 支持
MoveLast 不支持 支持 支持 支持
MoveNext 支持 支持 支持 支持
MovePrevious 不支持 支持 支持 支持
NextRecordset 支持 支持 支持 支持
Open 支持 支持 支持 支持
Requery 支持 支持 支持 支持
Resync 不支持 不支持 支持 支持
Supports 支持 支持 支持 支持
Update 支持 支持 支持 支持
UpdateBatch 支持 支持 支持 支持
--------------------------------------------------------------
其中NextRecordset方法并不适用于Microsoft Access数据库。

LockType
Recordset对象Open方法的LockType参数表示要采用的Lock类型，如果忽略这个参数，那么系统会以Recordset对象的LockType属性为预设值。LockType参数包含adLockReadOnly、adLockPrssimistic、adLockOptimistic及adLockBatchOptimistic等，分述如下：
-------------------------------------------------------------
常数 常数值 说明
--------------------------------------------------------------
adLockReadOnly 1 缺省值，Recordset对象以只读方式启动，无法运行AddNew、Update及Delete等方法
adLockPrssimistic 2 当数据源正在更新时，系统会暂时锁住其他用户的动作，以保持数据一致性。
adLockOptimistic 3 当数据源正在更新时，系统并不会锁住其他用户的动作，其他用户可以对数据进行增、删、改的操作。
adLockBatchOptimistic 4 当数据源正在更新时，其他用户必须将CursorLocation属性改为adUdeClientBatch才能对数据进行增、
删、改的操作。

附件中，请注册下载。

[mDown=attachments/month_0703/g2007319163854.zip]点击下载此文件[/mDown]

说明：本方转自http://www.osxcn.com。

从这些CSS Gallery网站中精选了20个比较漂亮的XHTML＋CSS布局网站，推荐给喜欢网页设计的人，无论是做博客模板还是做网站设计，在设计理念、色调、导航条、按钮、排版布局方面，都有一些值得借鉴的地方。

1、competitious.com


2、carawilliams.com.au


3、qodo.co.uk


4、tulumarka.com


5、egolounge.de


6、luisalarcon.com


7、simplebits.com


8、456bereastreet.com


9、buzzrecruitment.co.nz


10、menumania.co.nz


11、justinshattuck.com


12、tanyamerone.com


13、thecicak.com


14、magicsoul.net


15、mindmeister.com


16、nclud.com


17、refresh-dc.org


18、spousenotes.com


19、webdesign.activo.cz


20、whoisjengordon.com

很久，在mysql.com的download里面就放上了台湾的那国民党旗帜，因此也在网上看到些“愤青”们出言不用mysql的贴子。

今天因为要装mysql，去了http://mysql.com上一趟，再次发现这图：


我没有选新加坡，也没有挑日本，我挑的Taiwan [National Sun Yat-Sen University这个链接来下载。或许有人会说什么台独之类的话，我不爱听，我以为自己不参于政事，这些事情跟自己一点干系也没有，为什么我们搞IT的也要当政治家？如果mysql.com上面没有中国的镜像下载地址，也没有台湾的下载地址，我会挑日本(切莫说出我不爱国之类的P话来)，我会觉得这样下载得更快。

突然想起一年前http://swishzone.com上也放的tw-flag，顺便跑去看了下，发现如下：


有了五角星的小红旗，台湾的那个也有(一年前是没有五角星的)。

在做一个页面，这个页面是完全按一张登记表格的样子做出来的，完成后的表单接近有400多个，一般的做法是会将它分面多个页面按步提交，不然400个input提交数据量较大的时候就要更改iis或apache里的那个post数据量的设置，而多数人是很没有这个更改权限的。不是我不会把它弄成多个页面分次提交，这样程序上当然就好实现了，但当客户不想这么干那么办？哎，暂时按400个input做起来再说。

回到正题，难点所在：这个表单中有两部分是一个登记型的表格，它们共用一个name属性，在数据库里面属一个字段，大致图如下：
------------------------------------------------------
| ColumnName | ColumnName2 | ...
------------------------------------------------------
| | | .....
------------------------------------------------------
| | | .....
------------------------------------------------------
......
------------------------------------------------------
| | | .....
------------------------------------------------------

即它们共用一表头，有不定数的输入框。用户要一次往数据库里插入多行记录，但他不愿意分多步来操作。于是我们把同表头的input的name属性设置成一样，这样提交后会收到在asp里会收到一逗号分开的变量集合，而在php里会收到一数组，对于逗号隔开的集合，我们这样来取得各变量的值：
Dim varName(10),i=0 While i<=9    varName=Split(Request.Form("name"),",")(i) Wend ....
这样数组varName里取得的就是10个变量的值了

这样就存在一个问题：假如用户在某个input里输入了逗号，那怎么办？当然就会出错，因此还得将用户输入的半角逗号替换成全角的。这个在输入框里加上一段代码：
onkeyup="value=value.replace(/,/g,'，')" onbeforepaste="clipboardData.SetData('text',clipboardData.getData('text').replace(/,/g,'，'))" 

onbeforepaste是将用户复制到input里的逗号也替换，如果没有这行，那用户利用粘贴板输入的半角逗号是没有办法替换掉的。

而在php里，就简单得多，因为php收到同名变量有多个值的话，它自动把他们存在一数组里，因此没有必要写类似$varName=explode(",",$_POST['name'])[i]这样的代码，你只需用for循环来读取变量的值就可以了，也不存在逗号的问题。甚至你可以$varName=$_POST["abc".$i$]来取得变量，我试了varName=Request("abc"&i)是行不通的。

对比一下，得出一结论，也正是小余说的那句话：php非常灵活。

最近电脑反映慢了很多，运行msconfig，启动项里并没有加载太多项目。于是我打开服务关掉了一些看似不必要的服务项目。开机再重启，速度也没有提升多少，倒是IIS运行不了了，启动该服务时报错：1068，依赖的服务没有启动类似的错误。

Windows系统中的每个组件都或多或少地与其他组件有着密切联系，微软将这种“联系”称之为“依存服务”，当一个组件的重要依存服务出现问题时，这个组件就有可能出现安装、运行等方面的失败现象。

解决办法：服务中选择属性，查看依存关系项目，然后启动依存的服务，然后再启动该服务就该可以了。

原来我关掉了Security Accounts Manager服务，当时从字面上理解它只是管理windows账号的，应该可以关，没想IIS的相关账号也属它管。启动之，重启，一切ＯＫ！

另外发现一个小技巧：很多服务我们在控制面板里的“服务”中是无法停掉的，我们可以运行：msconfig,打开“启动”选项卡，在相应的启动项前面去掉勾勾，这样该服务就被停掉了。不过在您停掉该服务之前，你得了解它是做什么用的，不然你有可能将你的Windows也"停掉"的。

先来看看这个函数：
Function UnCheckStr(Str)     If Str="" or  Str=Null Then       UnCheckStr=Str       Exit Function     End If     Str = replace(Str, "&quot;", "'")     Str = Replace(Str, "sel&#101;ct", "select")     Str = Replace(Str, "jo&#105;n", "join")     Str = Replace(Str, "un&#105;on", "union")     Str = Replace(Str, "wh&#101;re", "where")     Str = Replace(Str, "ins&#101;rt", "insert")     Str = Replace(Str, "del&#101;te", "delete")     Str = Replace(Str, "up&#100;ate", "update")     Str = Replace(Str, "lik&#101;", "like")     Str = Replace(Str, "dro&#112;", "drop")     Str = Replace(Str, "cr&#101;ate", "create")     Str = Replace(Str, "mod&#105;fy", "modify")     Str = Replace(Str, "ren&#097;me", "rename")     Str = Replace(Str, "alt&#101;r", "alter")     Str = Replace(Str, "ca&#115;t", "cast")     UnCheckStr=Str End Function

大多数情况下，它工作正常，但当它加于从数据库中读出的字段（刚好该字段可以为空而正为空的时候）就出来了以下错误：

Microsoft VBScript 运行时错误 错误 '800a005e'
无效使用 Null: 'Replace'

解决方法：
Function UnCheckStr(Str)     If Str="" or IsNull(Str) Then       UnCheckStr=Str       Exit Function     End If     Str = replace(Str, "&quot;", "'")     Str = Replace(Str, "sel&#101;ct", "select")     Str = Replace(Str, "jo&#105;n", "join")     Str = Replace(Str, "un&#105;on", "union")     Str = Replace(Str, "wh&#101;re", "where")     Str = Replace(Str, "ins&#101;rt", "insert")     Str = Replace(Str, "del&#101;te", "delete")     Str = Replace(Str, "up&#100;ate", "update")     Str = Replace(Str, "lik&#101;", "like")     Str = Replace(Str, "dro&#112;", "drop")     Str = Replace(Str, "cr&#101;ate", "create")     Str = Replace(Str, "mod&#105;fy", "modify")     Str = Replace(Str, "ren&#097;me", "rename")     Str = Replace(Str, "alt&#101;r", "alter")     Str = Replace(Str, "ca&#115;t", "cast")     UnCheckStr=Str End Function