文件列表:

Dreamweaver标签插件\PowerEasy_SiteWeaver6.5_DW2004.mxp (246645, 2008-01-08)
Dreamweaver标签插件\PowerEasy_SiteWeaver6.5_DW8.mxp (246637, 2008-01-08)
Dreamweaver标签插件\PowerEasy_SiteWeaver6.5_DWMX.mxp (246050, 2008-01-08)
Dreamweaver标签插件\使用说明.mht (172051, 2008-01-08)
Dreamweaver标签插件 (0, 2008-03-03)
从2006版升级的操作步骤.txt (1426, 2008-01-08)
动易通行证\PDO_API统一接口数据同步程序\UserSynchro\Code\client.js (5841, 2008-01-08)
动易通行证\PDO_API统一接口数据同步程序\UserSynchro\Code\style.css (1812, 2008-01-08)
动易通行证\PDO_API统一接口数据同步程序\UserSynchro\Code (0, 2008-03-03)
动易通行证\PDO_API统一接口数据同步程序\UserSynchro\index.htm (10025, 2008-01-08)
动易通行证\PDO_API统一接口数据同步程序\UserSynchro\UserSynchro.asp (27068, 2008-01-08)
动易通行证\PDO_API统一接口数据同步程序\UserSynchro (0, 2008-03-03)
动易通行证\PDO_API统一接口数据同步程序 (0, 2008-03-03)
动易通行证\PDO统一接口开发规范1.0.doc (99328, 2008-01-08)
动易通行证\动易通行证使用指南.doc (48128, 2008-01-08)
动易通行证 (0, 2008-03-03)
升级及转换程序\动易2005 To SiteWeaver6.5 数据库升级程序\Upgrade.asp (91740, 2008-01-08)
升级及转换程序\动易2005 To SiteWeaver6.5 数据库升级程序\升级说明.txt (2260, 2008-01-08)
升级及转换程序\动易2005 To SiteWeaver6.5 数据库升级程序 (0, 2008-03-03)
升级及转换程序\动易2006 To SiteWeaver6.5 数据库升级程序\Upgrade.asp (41544, 2008-01-15)
升级及转换程序\动易2006 To SiteWeaver6.5 数据库升级程序\从2006版升级的操作步骤.txt (1426, 2008-01-08)
升级及转换程序\动易2006 To SiteWeaver6.5 数据库升级程序\操作说明.txt (1195, 2008-01-08)
升级及转换程序\动易2006 To SiteWeaver6.5 数据库升级程序 (0, 2008-03-03)
升级及转换程序\数据转换迁移程序\DataTrans.asp (77883, 2008-01-08)
升级及转换程序\数据转换迁移程序\数据转换迁移说明.txt (1618, 2008-01-10)
升级及转换程序\数据转换迁移程序 (0, 2008-03-03)
升级及转换程序 (0, 2008-03-03)
安装说明.txt (258, 2008-01-08)
源代码\AD\ADCount.asp (1058, 2008-01-08)
源代码\AD\ADShow.asp (3639, 2008-01-08)
源代码\AD\ADTemplate\Template_Banner.js (6714, 2008-01-08)
源代码\AD\ADTemplate\Template_BottomLeft.js (6190, 2008-01-15)
源代码\AD\ADTemplate\Template_BottomRight.js (6203, 2008-01-15)
源代码\AD\ADTemplate\Template_Code.js (1565, 2008-01-08)
源代码\AD\ADTemplate\Template_Couplet.js (7447, 2008-01-15)
源代码\AD\ADTemplate\Template_Fixed.js (5777, 2008-01-08)
源代码\AD\ADTemplate\Template_Float.js (8946, 2008-01-08)
源代码\AD\ADTemplate\Template_Move.js (6486, 2008-01-08)
源代码\AD\ADTemplate\Template_Pop.js (8561, 2008-01-08)
... ...

<% '************************************************************** ' Software name: PowerEasy SiteWeaver ' Web: http://www.powereasy.net ' Copyright (C) 2005－2008 佛山市动易网络科技有限公司 版权所有 '************************************************************** If CheckUserLogined() = False Then Call CloseConn Response.Redirect "User_Login.asp" End If Call Read If FoundErr = True Then Call WriteErrMsg(ErrMsg, ComeUrl) End If Call CloseConn Sub Read() Dim MessageID, rs, rsNext, NextID, NextSender MessageID = PE_CLng(Trim(Request("MessageID"))) If MessageID = 0 Then FoundErr = True ErrMsg = ErrMsg & "

指定的短消息ID错误！

" Exit Sub End If Conn.Execute ("update PE_Message set Flag=1 where Incept='" & UserName & "' and ID=" & MessageID) Conn.Execute ("update PE_User set UnreadMsg=UnreadMsg-1 where UserName='" & UserName & "'") Set rsNext = Conn.Execute("select ID,Sender from PE_Message where Incept='" & UserName & "' and Flag=0 and IsSend=1 and ID>" & MessageID & " order by SendTime") If Not (rsNext.BOF And rsNext.EOF) Then NextID = rsNext(0) NextSender = rsNext(1) End If Set rsNext = Nothing Set rs = Conn.Execute("select * from PE_Message where (Incept='" & UserName & "' or Sender='" & UserName & "') and ID=" & MessageID) If rs.BOF And rs.EOF Then FoundErr = True ErrMsg = ErrMsg & "

找不到指定的短消息

" Set rs = Nothing Exit Sub End If Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " If NextID <> "" Then Response.Write " " End If Response.Write "

阅 读 短 消 息

" Response.Write "   " Response.Write "  " Response.Write "  " Response.Write " " Response.Write "

发 送 人：" & rs("Sender") & "

发送时间：" & rs("SendTime") & "

消息主题：" & PE_HTMLEncode(rs("Title")) & "

" & FilterBadTag(rs("Content"), rs("Sender")) & "

" Response.Write " [读取下一条信息]" Response.Write "

" Response.Write "" Response.Write "" rs.Close Set rs = Nothing End Sub %>

近期下载者：

相关文件：

评论：[我要评论] [举报此文件]

收藏者：