一聚教程网:一个值得你收藏的教程网站

热门教程

flash留言板制作二

时间:2022-07-02 23:15:50 编辑:袖梨 来源:一聚教程网

flash留言板制作二
本文章主要讲flash留言板制作以及提供flash留言板源文件和asp+flash留言板源码最终目的就是让你用flash制作留言板 ,现在我们来看看asp文件是怎么处理由flash发送来的文件吧.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Response.Charset="utf-8"%>
<%Session.CodePage = "65001"%>

<%
dim Conn,rs,username,word
username=request("username")
word=request("word")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString = "Dbq="&Server.MapPath("liouyan.mdb")&"; Driver={Microsoft Access Driver (*.mdb)}"
Conn.Open
SQL="insert into userinfo(username,word) values ('"&username&"','"&word&"')"
Conn.Execute(SQL)
Conn.close
set Conn=nothing
%>

上面是把数据保存到数据,

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Option Explicit
response.contentType="text/xml"
dim Conn,rs,SQL,i
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString = "Dbq="&Server.MapPath("liouyan.mdb")&"; Driver={Microsoft Access Driver (*.mdb)}"
Conn.Open
set rs=Server.createObject("ADODB.RecordSet")
SQL="select * from userinfo"
rs.open SQL,Conn,1,1
i=1
response.write("")
do while not rs.Eof
response.write("")
rs.moveNext
i=i+1
loop
response.write("
")
rs.close
set rs=nothing
Conn.close
set Conn =nothing
%>

 这里是把数据以xml 文档显示给flash读取并进行输出.就这么简单的,其它就主要就是把分析xml y

 

 

热门栏目