ASP中Dictionary对象的一个奇怪问题
首先贴代码：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim objDic
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Set objDic = Server.CreateObject("Scripting.Dictionary")
objDic.Add "key",arr
Response.Write("这是修改之前的值：" & objDic.Item("key")(0))
objDic.Item("key")(1) = objDic.Item("key")(1) + 4
Response.Write("这是修改之后的值：" & objDic.Item("key")(1))
%>
下面是运行结果：
这是修改之前的值：0这是修改之后的值：0
可以看到objDic.Item("key")(0)的值根本没有任何变化，这是为什么？
下面我们将代码修改一下：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim objDic
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Set objDic = Server.CreateObject("Scripting.Dictionary")
objDic.Add "key",arr
Response.Write("这是修改之前的值：" & objDic.Item("key")(0))
arr(0) = arr(0) + 4
objDic.Item("key") = arr
Response.Write("这是修改之后的值：" & objDic.Item("key")(0))
%>
再来看看运行结果：
这是修改之前的值：0这是修改之后的值：4
这下结果正确了。
现在我明白了，在ASP中给一个key赋值只能通过objDic.Item(key) = value的方式进行，而且不能有任何的运算符。
相关文档：
我写了一个表单就是用来向数据库中添加数据的 action=post.asp method=post
然后再post.asp当中我又通过request.form获取了相应的值，然后添加的数据库当中
所有的代码如下
------------------------------------conn.asp-----------------------------
<%
dim db
const databasetype="access"
db="data\meiyijix ......
摘自：http://shawangkun.woku.com/article/2723424.html
最简单的用以下语句:
ip=request.ServerVariables("REMOTE_ADDR")
response.Write(ip)
但这种方法对代理服务器上网的就不准了,故比较全面的是用下面的方法:
<%Private Function getIP()
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_F ......
访问远程数据库的情况有以下几种：
1）访问远程数据库的access数据库
2）访问远程mssql数据库或oracle等其他关系数据库，但是数据库通信端口被防火墙阻挡或其他网络原因造成无法使用该端口
本文仅在windows2000 advance server,mdac2.8下测试通过，其余条件不保证能正常运行
在mdac的Service Providers中包括Microsoft ......
废话不多说，贴代码：
先来看看ByVal传值：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByVal a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("我在sub过程中更改了值："&a(0)&","&a(1)&","&a(2))
......
asp中的rs.open于conn.execute的区别
rs.open sql,conn：如果sql是delete,update,insert则会返回一个关闭的记录集，在使用过程中不要来个rs.close在文件最后再写rs.close
中间可以来多个记录集rs1.open sql1,conn，最后一块关闭记录集:rs.close rs1.close
con ......
