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的方式进行，而且不能有任何的运算符。
相关文档：
试验了好久，终于搞定了。
首先，必须有错误继续进行的声明On Error Resume Next
然后尝试简历jmail实例：
Dim JMail
Set JMail=Server.CreateObject("JMail.Message")
对实例做出判断，如果组件没有安装成功， ......
摘自：http://zxlh168.blog.163.com/blog/static/7778614020098168638654/
<%
’FSO组件名称
dim FSObject
FSObject="Scripting.FileSystemObject"
’=========================================================
’◆是否支持组件
’=============================================== ......
ASP连接数据库的11种方法——本文总结了使用ASP链接各种数据库的方法：
1.Access数据库的DSN-less连接方法:
set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("数据库所在路径")
2.Access OLE DB连接方法� ......
ASP是微软公司实现动态网页的一种技术。
ASP支持一些脚本语言，主要以VBScript为主。
与ASP相比较，你还可以选择另一中开放源代码编程语言——PHP，PHP可以运行在多种操作系统下，其中包括Linux和windows。
虽然ASP是一种不错的技术，但从长远考虑我相信PHP在将来的技术领域里会有不凡的表现。
我认为有七� ......
