软件开发培训班 >> 创意设计 >> Dreamweaver


UltraDev 4系列插件教程(1)

插件名字
版本
类型
作者
下载该插件
AspDream2
2.0
Object
emmauel

　　Macromedia 公司的Extension Manager(插件管理器)目前版本为1.2，安装UltraDev 4时是会自动安装的。这是一款对象的插件，可以实现在Dreamweaver插入ASP语句，具有向导模式的功能。包括八个对象：

“AspGrid”用于连接数据库，并执行查询和将结果汇报至HTML表中；
“AspDrop”与“AspGrid”有点类似，所不同的是它从查询结果中产生一个下拉式列表。
“AspMail”可以创建所有的小型程序通过CDONTS asp对象来发送基于e-mail的服务。
“Request”，表单和应答书写器都是这些Asp函数的小的快捷方式。
“Asp table”产生一个完整的asp表，可以是指定它的行数和列数。
“AspCookie”产生Asp Cookie，可以取回客户端cookies允许的创建和请求。
“AspFileRead”允许在网页中显示文本文件的内容。
“AspFileCreate”允许在网络服务器中创建一个文本文件。
　　以上所有的对象都可以在ASP通过Object Window(对象窗口)来进行访问。

　　1.首先安装这个插件了。完成后如下

　　

　　2.AspGrid对象

　　

　　

　　如图2所示，AspGrid可以设置DSN(Data Source Name“数据源”)，来连接数据库，为了安全己见，可以设置USER(用户)和Password(密码)，还可以设置显示域的数目、SQL查询条件以及当记录集为空的时候显示的文本。如图2所示填写AspGrid对话框，点击OK键后，产生如图2-2的HTML表，点击图中的各个ASP图标分别可以看到以下在Dreamweaver插入的ASP语句：
response.write (Objrs("field1"))；
response.write (Objrs("field2"))；
response.write (Objrs("field3"))；
response.write (Objrs("field4"))；
response.write (Objrs("field5"))；



　　3.AspDrop对象

　　
　　　(图3)

　　
　　　 (图3-1)
　　
　　　(图3-2)

　　(如图3)所示，AspDrop跟AspGrid基本类型，同样又DSN、USER、Password、SQL查询条件以及当记录集为空的时候显示的文本的设置，唯一不同的是可以设置显示的域和发送的域。如图画填写对话框，点击OK键后产生(如图3-1)的下拉式列表，双点列表在弹出的对话框中的ListValue后可以看到(如图3-2)的窗口。点击图中开始ASP图标可以看到以下在Dreamweaver插入的ASP语句，它是根据对话框的填写自动产生的：

Dim ObjDB
Dim ObjRS
Dim Sql
Sql = "SELECT distinct * FROM Student WHERE (Name LIKE "李四") ORDER BY Id;"
Set ObjDB = Server.CreateObject("ADODB.Connection")
ObjDB.Open "d:\studentinfo.mdb", "dragon", "dragon"
Set ObjRS = ObjDB.Execute(Sql)
If objRS.EOF Then
Response.Write("No Record")
Else

　　而点击后面的ASP图标可以看到以下在Dreamweaver插入的ASP语句：

End If
objRS.Close
objDB.Close
Set objRS = Nothing
Set objDB = Nothing



　　4. AspMail对象

　　
　　　(图4)

　　如图4所示，AspMail产生一个对话框可以设置E-MAIL发自哪儿，发到哪儿，以及E-MAIL的主题及E-mail CC、E-mail BCC、E-mail附件和E-mail内容等等。在对话框上面如图4填写，可以在Dreamweaver插入以下ASP语句：

Dim Emfrom
Dim Emsub
Dim Emto
Dim Emcc
Dim Embcc
Dim Embody
Dim Emattach

Emfrom = "gg@263.net"
Emsub = "春天的祝福"
Emto = "mm@163.net"
Emcc = ""
Embcc = ""
Embody = "mm:
你好！好久没与你联系，不知你近来怎样？
gg"
Emattach = "D:\1.zip"

Dim ObjCdo
Set ObjCdo = Server.CreateObject("CDONTS.NewMail")
ObjCdo.From = Emfrom
ObjCdo.Subject = Emsub
ObjCdo.To = Emto
ObjCdo.cc = Emcc
ObjCdo.bcc = Embcc
ObjCdo.body = Embody
ObjCDO.AttachFile(Emattach)

ObjCdo.send

Set ObjCdo = nothing

 
　　5．Request对象

　　产生response.write语句。其对话框如图5所示。

　　
　　　(图5)


　　6．Asp table对象

　　

　　产生一个完整的asp表，可以是指定它的行数和列数。如图６所示。以下是在Dreamweaver插入的语句：
' ------------------------Begining of ASP Table -------------------------------------------------------------------
Dim Emlines
Dim EmCols
Dim i ' ********* counter of lines
Dim j ' ********* counter of columns
Dim EmCurrent '********* value for the current cell

Emlines = 2
EmCols = 3

response.write(" ")

for i=1 to Emlines
response.write(" ")
for j=1 to Emcols
response.write(" ")
next
response.write("")
next

response.write("
")

Emcurrent= i*j '********* Modify emcurrent value to match your wish
If IsEmpty(EmCurrent) or IsNull(Emcurrent) or EmCurrent="" then
response.write(" ") ' ********* If EmCurrent is empty, generates a non breaking space
else
response.write(EmCurrent) '********* else, render its value in the cell
end if

response.write("
")
' ------------------------End of ASP Table -------------------------------------------------------------------

　　7. AspCookie

　　
　　　(图7-1)

　　
　　　(图7-2)

　　产生Asp Cookie，可以获得客户端cookies允许的创建和请求。Cookie被用于在消费者的硬盘上保存信息。通过Cookie，可以在第一次登陆网站的时候给用户分配一个ID号，也使客户断的计算机上记录下这个ID号。利用AspCookie，如图7-1所示，可以通过设置Cookie名、Cookie值以及有效期限来创建Cookie。点击OK后，在Dreamweaver插入如下的ASP代码：
' ------------------------Begining of ASP Cookie -------------------------------------------------------------------
'This code must be placed at the beginning of the document, before anything is sent to the browser

response.cookies("Student_Id").expires= #12/3/2001#
response.cookies("Student_Id")= "12"

' ------------------------End of ASP Cookie -------------------------------------------------------------------
当然可以通过AspCookie来获得Cookies。利用Aspcookie.retreive对话框，如土7-2所示，在Dreamweaver插入了如下的ASP语句：
' ------------------------Begining of ASP Cookie -------------------------------------------------------------------

dim happy
happy = request.cookies("Student_Id")
'uncomment next line to debug or display the result
'response.write (happy)

' ------------------------End of ASP Cookie -------------------------------------------------------------------




　　8. AspFileRead

　　

　　 允许在网页中显示文本文件的内容。如图8所示，AspFileRead对话框提供了文件路径的填写，点击之后，在Dreamweaver插入了如下的ASP语句：
Dim MyFilePath
Dim MyFileObject
Dim MyFile

MyFilePath="d:\1.txt"
Set FSO = Server.CreateObject("scripting.FileSystemObject")
Set MyFileObject = FSO.getfile(MyFilePath)
Set Myfile = MyFileObject.OpenAsTextStream(1,-2)
response.write(Myfile.ReadAll)
MyFile.close
Set FSO = nothing

　　9. AspFileCreate

　　

　　允许在网络服务器中创建一个文本文件。如图9所示，AspFileCreate对话框提供了所创建文件的路径填写，点击之后，在Dreamweaver插入了如下的ASP语句：
Dim TheFilePath
Dim TheFile
TheFilePath="d:\1.txt"
Set FSO = Server.CreateObject("scripting.FileSystemObject")
Set TheFile = FSO.CreateTextFile(TheFilePath, True)
'************ beginning of the file body ***********
'TheFile.Writeline("

This is a sample
")
'TheFile.Writeline("This is a sample
")
'TheFile.Writeline("This is a sample