首页 新闻 论坛 群组 Blog 文档 下载 读书 Tag 网摘 搜索 .NET Java 游戏 视频 人才 外包 培训 数据库 书店 程序员
中国软件网
欢迎您:游客 | 登录 注册 帮助
    • ASP的网站刻录到光盘上自动播放??如何实现? [已结贴,结贴人:ASDFE123]
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • ASDFE123
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    • 揭贴率：
    发表于：2008-08-19 22:25:19 楼主
    网站是ASP+DBF的,现在要把网站的内容刻录到光盘上并能自动播放.
    是否一定要转为html格式?要怎么实现,谢谢!!
    100  修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • chinmo
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：

    • 2

      6
    发表于：2008-08-19 22:58:021楼 得分:5
    。。。。。。ASP的没得选择
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • littlelam
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-19 23:47:572楼 得分:0
    用NETBOX
    HTML code
    
NetBox 是一个全新概念的开发平台，它提供了业界最快速的用于开发 Internet 商业应用的开发和编译工具。NetBox 支持包括 JavaScript、VBScript、Perl 等目前应用最为广泛的脚本语言来构建功能强大和性能稳定的应用服务器、网络服务器以及 HTML-Based 网络多媒体桌面应用。NetBox 支持目前最为流行的 XML 和 Web Service 工业标准和 ASP、COM、.NET 等流行标准，NetBox 对第三方数据库的完美支持使您新构建的商务应用可以容易的将已有的应用系统整合进来，从而充分利用现有的 IT 资源，大大的节约投资。NetBox 提供的 SSL、TLS 安全协议、RSA、DES 等加密算法和独立于应用程序的虚拟机技术使您的数据得到最大限度的保护。NetBox 提供将应用部署到无线设备的能力。NetBox 提供将您的应用编译成独立可执行文件的能力，极大的加快运行速度和代码安全性。使用 NetBox 开发，大大提高了应用系统的可扩展性、稳定性和安全性。NetBox 的出现也首次让应用软件开发商能够如此快速和容易的构建完整的基于 Internet 强大应用。

　　NetBox Development Platform 开发 Server Application 和 Desktop Application，编译 Web 应用成独立可执行文件：

支持 JavaScript、VBScript、Perl 等脚本语言 
支持 XML 和 Web Service 
兼容 Active Server Pages 
支持 COM 和 .NET 组件 
支持 SSL 3.0、TLS 
内置 RSA、DES、3DES、SHA、MD5 
提供可编程的安全虚拟机用于运行第三方程序 
支持通过 ADO 和 ODBC 访问几乎所有的大型数据库 
支持系统硬件设备 RS232、RS485 等 
支持基于 Microsoft、CISCO 和其他厂商的群集技术 
兼容 Windows Script Components 并提供编译支持 
支持 WAP、WML 
构建 Web Service 和 Internet 应用程序

    下载地址http://www.netbox.cn:88/download/index.htm
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • littlelam
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-19 23:48:173楼 得分:30
    netbox可以打包asp程序
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • tomatofly
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-20 01:06:394楼 得分:5
    哦~~~ 第一次听说 学习了
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • _l_
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-20 06:41:285楼 得分:5

    决定收藏此贴
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • gold_one
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-20 08:43:106楼 得分:5
    收藏。
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • chinastorm
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-20 08:45:487楼 得分:5
    NETBOK看来很强大
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • ASDFE123
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-21 20:14:438楼 得分:0
    用NetBox 测试的时候是OK的,但把网站放到目录下就出现了错误~
    Microsoft VBScript 编译器错误 '800a0400'

    缺少语句

    \www\home.asp, line 104


    --------------------------------------------------------------------------------
    Host by NetBox Version 2.8 Build 4128

    网站首页是home.asp  如下==========================请告诉要怎么修改???  谢谢

    <%
    Session("Page")="home"
    Session("Top")="English"
    %>
    <!--#include File="Top.inc"-->
    <%
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open Driver & SourceType & SourceDB
    Set RSnw = Server.CreateObject("ADODB.RecordSet")
    nwSQL="Select * From news_run.dbf where nr_ifon='琌'"
    RSnw.Open nwSQL ,conn ,1 ,1
    i=0
    news_run=""
    If NOT RSnw.EOF Then
      RSnw.MoveFirst
      Do While NOT RSnw.EOF
        nr_econt=Trim(RSnw("nr_econt"))
        nr_link=Trim(RSnw("nr_link"))
        news_run=news_run & "" & " <a href=' " & nr_link & " '>" & nr_econt & " </a>"
        i=i+1
        RSnw.MoveNext
      Loop
    End If
    RSnw.Close : Set RSnw=Nothing : conn.Close : Set conn=Nothing
    %>
    <%
    dateline=(Year(date)-2004)*372+Month(date)*31+Day(date)
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open Driver & SourceType & SourceDB
    Set RSnw = Server.CreateObject("ADODB.RecordSet")
    nwSQL="Select * From news_area.dbf where na_ifon='琌' And ((Year(na_date)-2004)*372)+(Month(na_date)*31)+Day(na_date)>="&dateline&" Order by na_date Desc,na_no"
    RSnw.Open nwSQL ,conn ,1 ,1
    i=0
    tableListNA=""
    If NOT RSnw.EOF Then
      RSnw.MoveFirst
      Do While NOT RSnw.EOF
        na_link=Trim(RSnw("na_link"))
        na_econt=Trim(RSnw("na_econt"))
        tableListNA=tableListNA & " <font size='0' color='orange'> </font> <a href=' " & na_link & " '>" & na_econt & " </a> <br>"
        i=i+1
        RSnw.MoveNext
      Loop
    End If
    RSnw.Close : Set RSnw=Nothing : conn.Close : Set conn=Nothing
    %>
    <%
    Randomize
    strA=""
    redim NPSray(3)
    tableListNPS=""
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open Driver & SourceType & SourceDB
    Set RSnps = Server.CreateObject("ADODB.RecordSet")
    npsSQL="Select * From new_products.dbf where nps_ifon='琌'  Order by nps_no Desc"
    RSnps.Open npsSQL ,conn ,1 ,1
    If NOT RSnps.EOF Then
      numNPS=RSnps.RecordCount
      max_no=CSng(Right(Trim(RSnps("nps_no")),3))
      If numNPS <=3 Then
        RSnps.MoveFirst
        Do While NOT RSnps.EOF
          nps_no=Trim(RSnps("nps_no"))
          nps_name=Trim(RSnps("nps_name"))
          nps_photo=Trim(RSnps("nps_photo"))
          nps_exp=Trim(RSnps("nps_exp"))
          nps_csno=Trim(RSnps("nps_csno"))
          nps_cano=Trim(RSnps("nps_cano"))
          nps_pdf=Trim(RSnps("nps_pdf"))
          If Len(nps_exp)>60 Then nps_exp=Left(nps_exp,60)
          tableListNPS=tableListNPS & " <div id='newprd'> <a href='pdf/"&nps_pdf&"' target='_blank'> <img src='" & npsPhotoRoot & nps_photo & "' alt='" & nps_name & "' name='newprd1' width='90' height='90' border='0'> </a>"
          tableListNPS=tableListNPS & " <div id='newprdhead'> <a href='pdf/"&nps_pdf&"' target='_blank'>" & nps_name & " </a> </div>"&nps_exp&" </div>"
        RSnps.MoveNext
        Loop
      Else
        rundomNUM="[" & Round(max_no * Rnd) & "]"
        If rundomNUM="[0]" Then rundomNUM="[1]"
        For j=0 To 2
          Do While Instr(1,strA,rundomNUM)>0
            rundomNUM="[" & Round(max_no * Rnd) & "]"
            If rundomNUM="[0]" Then rundomNUM="[1]"
          Loop
          NPSray(j)=Replace(rundomNUM,"[","")
          NPSray(j)=Replace(NPSray(j),"]","")
          NPSray(j)="nps" & Right(CSng(NPSray(j))+1000,3)
          strA=strA & rundomNUM
        Next
        For k=0 To 2
          Set RSnps = Server.CreateObject("ADODB.RecordSet")
          nps_no=NPSray(k)
          npsSQL="Select * From new_products.dbf where nps_ifon='琌' And nps_no='"&nps_no&"'"
          RSnps.Open npsSQL ,conn ,1 ,1
          If NOT RSnps.EOF Then
            nps_name=Trim(RSnps("nps_name"))
            nps_photo=Trim(RSnps("nps_photo"))
            nps_exp=Trim(RSnps("nps_exp"))
            nps_csno=Trim(RSnps("nps_csno"))
            nps_cano=Trim(RSnps("nps_cano"))       
            nps_pdf=Trim(RSnps("nps_pdf"))
            If Len(nps_exp)>60 Then nps_exp=Left(nps_exp,60)
            tableListNPS=tableListNPS & " <div id='newprd'> <a href='pdf/"&nps_pdf&"' target='_blank'> <img src='" & npsPhotoRoot & nps_photo & "' alt='" & nps_name & "' name='newprd1' width='90' height='90' border='0'> </a>"
            tableListNPS=tableListNPS & " <div id='newprdhead'> <a href='pdf/"&nps_pdf&"' target='_blank'>" & nps_name & " </a> </div>"&nps_exp&" </div>"       
            If k=2 Then tableListNPS=tableListNPS & " <div id='more2'> <a href='newsprd.asp'> <img src='images/icon_li.gif' alt='>>' width='6' height='5' border='0'> more.. </a> </div>"
            //tableListNPS=tableListNPS & " </div>"
          End If
        Next   
      End If
    End If
    RSnps.Close : Set RSnps=Nothing : conn.Close : Set conn=Nothing
    %>
    <script src="http://www.google-analytics.com/urchin.js" type="text/javascript">
    </script>
    <script type="text/javascript">
    _uacct = "UA-2977683-1";
    urchinTracker();
    </script>
    <table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="490" height="235">
                  <param name="movie" value="home.swf">
                  <param name=quality value=high>
                  <param name="WMODE" value="transparent">
                  <embed src="home.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="490" height="235"> </embed>
                </object> </td>
                <td> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="260" height="235">
                  <param name="movie" value="home2.swf">
                  <param name=quality value=high>
                  <param name="WMODE" value="transparent">
                  <embed src="home2.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="260" height="235"> </embed>
                </object> </td>
              </tr>
            </table>
    <div id="homecontent">
    <div id="news">
    <div id="newshead"> <strong>HOT </strong> NEWS </div>
    <div id="marquee"> <marquee behavior="scroll" direction=left scrollamount=2 onmouseover="this.stop();" onmouseout="this.start();"> <%=news_run%> </marquee> </div>
    <div id="newslist">
        <marquee  direction="up" height="50"  scrollamount=1 onmouseover="this.stop();" onmouseout="this.start();"> <%=tableListNA%> </marquee>        
    </div>
    <div id="more"> <a href="news.asp"> <img src="images/icon_li.gif" alt=">>" width="6" height="5" border="0"> more.. </a> </div>
            <br> <br>
    </div>
    <div id="newsprdfield">
            <%=tableListNPS%>
            <!--
    <div id="newprd"> <a href="#"> <img src="123.gif" alt="New Product 1" name="newprd1" width="90" height="90" border="0"> </a>
    <div id="newprdhead"> <a href="#">Prduct name 1 </a> </div>product detail goes here product detail goes
    </div>
    <div id="newprd"> <a href="#"> <img src="123.gif" alt="New Product 1" name="newprd1" width="90" height="90" border="0"> </a>
    <div id="newprdhead"> <a href="#">Prduct name 2 </a> </div>product detail goes here product detail goes
    </div>
            <div id="newprd"> <a href="#"> <img src="123.gif" alt="New Product 1" name="newprd1" width="90" height="90" border="0"> </a>
    <div id="newprdhead"> <a href="#">Prduct name 3 </a> </div>product detail goes here product detail goes </div>
            </div>
            -->        
           
                    </div>
           

    </div>

    </div>
    <!--#include File="Bottom.inc"-->
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • chinmo
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：

    • 2

      6
    发表于：2008-08-21 20:40:469楼 得分:30
    你看下104行缺少了什么
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • ASDFE123
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-21 21:05:1910楼 得分:0
    //tableListNPS=tableListNPS & " </div>"  这就是104行 
    而且发现好多页面都错误.
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • chinmo
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：

    • 2

      6
    发表于：2008-08-21 21:10:1611楼 得分:10
    你是不是想注释掉这一行啊？

    为什么加//？？
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • ASDFE123
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-21 21:11:2612楼 得分:0
    可以加QQ吗  我的是40942490 谢谢~
    修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • linseng129
    • 等级:
    • 可用分等级：
    • 总技术分：
    • 总技术分排名：
    发表于：2008-08-21 21:31:0613楼 得分:5
    FLA
    修改 删除 举报 引用 回复
    网站简介－广告服务－网站地图－帮助－联系方式－诚聘英才－English－ 问题报告
    北京创新乐知广告有限公司 版权所有 京 ICP 证 070598 号
    世纪乐知(北京)网络技术有限公司 提供技术支持
    Copyright © 2000-2008, CSDN.NET, All Rights Reserved