⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 pe2005_datatrans.asp

📁 《动易网站管理系统》2005 SP2正式版中
💻 ASP
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Server.ScriptTimeOut = 9999999
%>
<html>
<head>
<title>动易2005版 数据转换/迁移程序</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/style.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
Dim Action, BeginTime, EndTime, i
Dim Conn_Source, Conn_Remote, Source_Type, Remote_Type, Source_AC, Source_SQL, Remote_AC, Remote_SQL
Dim UpdateTable, TableName, Info_CurrentUpdate
Dim RecordNum, RecordIndex, TotalRecordNum, TotalRecordIndex
Dim arrUserLevel, arrGroupID
Dim ArrSkinID(), ArrTemplateID()
ReDim ArrSkinID(0, 0), ArrTemplateID(0, 0)
Dim PE_False, PE_True, PE_Now

Source_Type = Trim(request("Source_Type"))
Source_AC = Trim(request("Source_AC"))
Source_SQL = Trim(request("Source_SQL"))
Remote_Type = Trim(request("Remote_Type"))
Remote_AC = Trim(request("Remote_AC"))
Remote_SQL = Trim(request("Remote_SQL"))
If Source_Type = "ACCESS" Or Source_Type = "SQL" Then
    Dim arrPETrans
    arrPETrans = Split("PowerEasy" & "$$$" & Source_Type & "$$$" & Source_AC & "$$$" & Source_SQL & "$$$" & Remote_Type & "$$$" & Remote_AC & "$$$" & Remote_SQL, "$$$")
    Session("arrPETrans") = arrPETrans
Else
    Session("arrPETrans") = Split("$$$$$$$$$$$$$$$", "$$$")
End If

If Remote_Type = "SQL" Or Session("arrPETrans")(4) = "SQL" Then
    PE_True = "1"
    PE_False = "0"
    PE_Now = "getdate()"
Else
    PE_True = "True"
    PE_False = "False"
    PE_Now = "Now()"
End If

TotalRecordIndex = 0
Action = Trim(request("Action"))
If Action = "step1" Then
    Call step1
ElseIf Action = "step2" Then
    Call step2
ElseIf Action = "Update" Then
    Call Update
Else
    Call Main
End If
Response.Write "</body></html>"


Sub Main()
%>
<form name="myform" method="post" action="PE2005_DataTrans.asp">
  <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
    <tr align="center" class="title">
      <td height="30"><strong>动易2005版 数据转换/迁移程序</strong></td>
    </tr>
    <tr class="tdbg">
      <td>
        <p align="center">
          <font color="#FF0000">本程序支持动易2005版的任一数据库版本之间的数据转换。可以在ACCESS--SQL、ACCESS--ACCESS、SQL--SQL之间互相转换。使用前请一定要认真仔细的阅读下面的操作步骤及注意事项！！！<br></font>
        </p>
        <p><b>约定：</b><br>当前你正在使用的网站的数据库称为“<font color='red'>目标数据库</font>”，要转数据过来的数据库称为“<font color='red'>源数据库</font>”。
        <p>
        <strong>操作步骤：</strong><br>
        1、备份您的源数据库。<br>
        2、如果目标数据库是SQL数据库，则请新建sql数据库，用系统提供的PowerEasy2005.sql建表，并设置好数据库连接文件（不要运行Install.asp文件）。<br>
        3、将本程序文件（PE2005_DataTrans.asp）复制到WEB文件夹。<br>
        4、打开浏览器，在地址栏中输入本升级程序的地址，运行本程序。如：http://localhost/PE2005_DataTrans.asp。<br>
        5、认真阅读本说明后点“下一步”，开始升级操作。<br>
        6、升级成功后，请到系统后台认真仔细的检查相关数据。
        </p>
        <p><strong>注意事项：</strong> <br>
        1、本升级程序只适用于官方发布版本的数据库升级，不适用于其他修改版或美化版的升级工作。<br>
        2、本操作不建议您直接在服务器上进行，最好在本地架起调试环境然后进行升级工作。<br>
        3、本操作的更新时间视您数据的多少以及服务器（或本地机器）的配置决定，如果数据很多，更新可能很慢。<br>
        4、升级过程中千万不能刷新页面或关闭浏览器，如果出现超时或者错误提示，请使用备份数据重新进行升级操作。<br>
        5、若您是直接在服务器进行升级，则操作成功完成后，一定要删除此文件！以免带来安全隐患。<br><br>
        </p>
      </td>
    </tr>
    <tr class="tdbg">
      <td align="center"><input type='hidden' name='Action' value='step1'>
        <input name="Submit" type="submit" id="Submit" value="下一步">
      </td>
    </tr>
  </table>
</form>
<%
End Sub


Sub step1()
%>
<form name="myform" method="post" action="PE2005_DataTrans.asp">
  <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
    <tr align="center" class="title">
      <td height="30"><strong>动易2005版 数据转换/迁移程序</strong></td>
    </tr>
    <tr class="tdbg">
      <td width="100%" height="150" align=center valign="middle"><br>
        <table border="0" cellspacing="0" cellpadding="5">
          <tr>
            <td><b>第一步、请选择数据库类型，并输入数据库名称或连接字符串：</b></td>
          </tr>
          <tr>
            <td>
              <fieldset><legend>数据库连接</legend>
              <table width="700" border="0" cellpadding="10" cellspacing="5">
                <tr>
                    <th colspan="2" class="tdbg_main">源数据库信息设置</th>
                    </tr>
                <tr>
                  <td><input type="radio" name="Source_Type" value='ACCESS' checked> ACCESS版数据来源：</td>
                  <td>
                    <input name="Source_AC" type="text" value="PowerEasy2005.mdb" size="28"><font color="#FF0000">请使用相对当前文件路径。</font>                  </td>
                </tr>
                <tr>
                  <td><input type="radio" name="Source_Type" value='SQL'> SQL版数据来源：</td>
                  <td><textarea name="Source_SQL" cols="55" rows="3">Provider = Sqloledb; User ID = PowerEasy; Password = PowerEasy*9988; Initial Catalog = PowerEasy40; Data Source = 127.0.0.1;</textarea></td>
                </tr>
              </table>
              <table width="700" border="0" cellpadding="10" cellspacing="5">
                <tr bgcolor="#0066FF">
                    <th colspan="2" class="tdbg_main">目标数据库信息设置</th>
                    </tr>
                <tr>
                  <td><input type="radio" name="Remote_Type" value='ACCESS' checked> ACCESS版数据目标：</td>
                  <td>
                    <input name="Remote_AC" type="text" value="PowerEasy2005.mdb" size="28">
                    <font color="#FF0000">请使用相对当前文件路径。</font>                  </td>
                </tr>
                <tr>
                  <td><input type="radio" name="Remote_Type" value='SQL'>
                    SQL版数据目标：</td>
                  <td><textarea name="Remote_SQL" cols="55" rows="3">Provider = Sqloledb; User ID = PowerEasy; Password = PowerEasy*9988; Initial Catalog = PowerEasy40; Data Source = 127.0.0.1;</textarea></td>
                </tr>
              </table>
              </fieldset>
            </td>
          </tr>
          <tr>
            <td align='center'><input type='hidden' name='Action' value='step2'><input name="Submit" type="submit" id="Submit" value="下一步"></td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</form>
<%
End Sub


Sub step2()
    If chkdatabase() = False Then Exit Sub
%>
<form name="myform" method="post" action="PE2005_DataTrans.asp">
  <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
    <tr align="center" class="title">
      <td height="30"><strong>动易2005版 数据转换/迁移程序</strong></td>
    </tr>
    <tr class="tdbg">
      <td width="100%" height="150" align=center valign="middle"><br>
        <table border="0" cellspacing="0" cellpadding="5">
          <tr>
            <td><b>第二步、请选择要升级的数据库内容：</b></td>
          </tr>
          <tr>
            <td><fieldset><legend>基本内容</legend>
              <table width="700" border="0" cellpadding="0" cellspacing="5">
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Admin" checked>管 理 员</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Config" checked>网站配置</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Skin" checked>网站风格</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Template" checked>网站模板</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Channel" checked>网站频道</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Class" checked>网站栏目</td>
                </tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Article" checked>所有文章</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Soft" checked>所有软件</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Photo" checked>所有图片</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Special" checked>所有专题</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_JsFile" checked>ＪＳ数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Comment" checked>所有评论</td>
                </tr>
              </table>
              </fieldset></td>
          </tr>
          <tr>
            <td><fieldset><legend>其他内容</legend>
              <table width="700" border="0" cellpadding="0" cellspacing="5">
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Advertisement" checked>网站广告</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_AdZone" checked>广告版位</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Announce" checked>网站公告</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Author" checked>作者数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Card" checked>充 值 卡</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Classroom" checked>室场数据</td>
                </tr>
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_CopyFrom" checked>来源数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Equipment" checked>设备数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Favorite" checked>收 藏 夹</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Field" checked disabled>自定义字段</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Filters" checked>采集过滤</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_FriendSite" checked>友情链接</td>
                </tr>
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_FSKind" checked>链接类别</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_GuestBook" checked>网站留言</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_GuestKind" checked>留言类别</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_HistrolyNews" checked>采集历史</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Item" checked>采集项目</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_KeyLink" checked>字符替换</td>
                </tr>
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Label" checked>自定义标签</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Log" checked>网站日志</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Message" checked>短 消 息</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_NewKeys" checked>关 键 字</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_UsedDetail" checked>设备使用</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Vote" checked>网站调查</td>
                </tr>
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Bank" checked>银行帐户</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_BankrollItem" checked>资金明细</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_ConsumeLog" checked>消费明细</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_DeliverItem" checked>发退货记录</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_DeliverType" checked>送货方式</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_OrderForm" checked>订单数据</td>
                </tr>
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_OrderFormItem" checked>订单项目</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Payment" checked>支付数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_PaymentType" checked>付款方式</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_PresentProject" checked>促销方案</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Producer" checked>生 产 商</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Product" checked>商品数据</td>
                </tr>
                <tr>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_Trademark" checked>商标数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_TransferItem" checked>订单过户</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_User" checked>会员数据</td>
                  <td width="16%"><input name="UpdateTable" type="checkbox" id="UpdateTable" value="PE_UserGroup" checked>用 户 组</td>
                  <td width="16%"></td>
                  <td width="16%"></td>
                </tr>
              </table>
              </fieldset></td>
          </tr>
          <tr>
            <td align="center">
              <input type='hidden' name='Source_AC' value='<%=Source_AC%>'>
              <input type='hidden' name='Source_SQL' value='<%=Source_SQL%>'>
              <input type='hidden' name='Source_Type' value='<%=Source_Type%>'>
              <input type='hidden' name='Remote_AC' value='<%=Remote_AC%>'>
              <input type='hidden' name='Remote_SQL' value='<%=Remote_SQL%>'>
              <input type='hidden' name='Remote_Type' value='<%=Remote_Type%>'>
              <input type='hidden' name='Action' value='Update'>
              <input type="submit" name="StartUpdate" id="StartUpdate" value="开始升级">
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</form>
<%
End Sub

Function chkdatabase()
    On Error Resume Next
12345

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -