DSOFramer使用

最新推荐文章于 2024-09-05 23:26:14 发布

pk3000lc

最新推荐文章于 2024-09-05 23:26:14 发布

阅读量1.1k

点赞数

文章标签： upload file object dataset byte string

本文链接：https://blog.csdn.net/pk3000lc/article/details/4202512

版权

一、先注册一下DSOFramer.ocx

操作：将DSOFramer.ocx复制到C:/windows/system32目录下，

      开始->运行->regsvr32 DSOFramer.ocx , 系统会提示DSOFramer.ocx中的DllRegisterServer成功。

二、添加DSOFramer.ocx到你的项目中

操作：先说明一下，我用VS 2005 ，其他VS版本可能操作会有不同，操作应该也类似自己试试，问题应该不大。
      在你要访问DSOFramer.ocx的目录上点选右键菜单中的“添加现有项”，找到DSOFramer.ocx，确定。

三、在网页中加载DSOFramer

   新建Office.aspx

添加如下代码：
   <object id="MyOffice" name = "MyOffice" style="LEFT: 0px; WIDTH: 100%; TOP: 0px; HEIGHT: 100%"
classid="clsid:00460182-9E5E-11D5-B7C8-B8269041DD57" codebase="dsoframer.ocx#version=2,2,0,0" >
</object>

   [注]：VS 2005对语法的要求贼多，什么ID的值要用""括起来啦，<object>不能大写啦，……
         没什么大碍，但是很烦人，简直就是微软版的唐僧，我给大家提供的代码是修改过的，VS不会有哪些废话了。

   然后再body中加入onload事件的处理函数

               <body οnlοad="show_word();">

   再在<head></head>中间加入函数体

   <script language="javascript" type="text/javascript">

</script>

四、编制Getdc.aspx.cs文件
   建立Getdc.aspx文件，VS会同时建立与之关联的Getdc.aspx.cs文件

   先加入命名空间
      using System.Data.SqlClient;
using System.Data.SqlTypes;

   编辑Getdc.aspx.cs的Page_Load函数；
   protected void Page_Load(object sender, EventArgs e)
   {
      int pid = Convert.ToInt32(Request["id"]);

      SqlConnection myConnection = new SqlConnection("Data Source=/"localhost/";Initial Catalog=/"demo/";Persist Security Info=True;User ID=demo;Password=demo");//数据库的相关设置自己改吧，我就不废话了
      SqlCommand mycommand = myConnection.CreateCommand();
      myConnection.Open();

      mycommand.CommandText = "SELECT filedata " +
         " FROM Table_word WHERE (ID = " + pid.ToString() + ") ";//其中filedata的数据库类型是varbinary(MAX)
      SqlDataReader myReader = mycommand.ExecuteReader();
      myReader.Read();
      SqlBinary binaryStream = myReader.GetSqlBinary(0);
      myReader.Close();
      myConnection.Close();

      Response.BinaryWrite(binaryStream.Value);
}

   至此，只要你指定的ID没问题，就应该可以加载Word文档了。

五、建立保存文档的按钮

在Office.aspx中添加按钮

      <input id="Button1" type="submit" value="保存" οnclick="return Submit_upload_onclick()" />

再建立一个input

<input type="file" name="File" id = "File"/>

      然后添加Submit_upload_onclick()函数：

function Submit_upload_onclick() {
      var str=window.location.search;
      var pos_start=str.indexOf("id")+3;
      if (pos_start == 2)
      return ;

      document.all.MyOffice.HttpInit();
      document.all.MyOffice.HttpAddPostCurrFile("File", "");
      var id = "http://localhost/Savedc.aspx?id=" + str.substring(pos_start);
      document.all.MyOffice.HttpPost(id);
}

六、编制Savedc.aspx.cs文件
   建立Savedc.aspx文件，VS会同时建立与之关联的Savedc.aspx.cs文件

   先加入命名空间
      using System.Data.SqlClient;
using System.Data.SqlTypes;

   编辑Savedc.aspx.cs的Page_Load函数；

protected void Page_Load(object sender, EventArgs e)
{
      int pid = Convert.ToInt32(Request["id"]);
      Byte[] source_bin = Request.BinaryRead(Request.TotalBytes);

//---------------------------------------------------------------------------------------
   int i, loop, again = -1, file_begin = -1;
      for (i = 0; i < Request.TotalBytes; i++)
      {
         if (source_bin[i] == 13)
            if (source_bin[i + 1] == 10)
                  break;
      }
      Byte[] MyHeader = new Byte[i];
      for (loop = 0; loop < i; loop++)
         MyHeader[loop] = source_bin[loop];

      for (i += 2; i < Request.TotalBytes; i++)
      {
         if (source_bin[i] == 13)
            if (source_bin[i + 1] == 10)
                  if (source_bin[i + 2] == 13)
                     if (source_bin[i + 3] == 10)
                        break;
      }

      file_begin = i + 4;
      for (i = file_begin; i < Request.TotalBytes; i++)
      {
         for (loop = 0; loop < MyHeader.Length; loop++)
            if (source_bin[i + loop] != MyHeader[loop])
                  break;
         if (loop >= MyHeader.Length)
         {
            break;
         }
      }

      Byte[] result = new Byte[i - file_begin];
//这是个不得已的办法，用循环肯定会慢，但我不会其他方法
//希望高手完善
      for (loop = file_begin; loop < i - file_begin; loop++)
         result[loop - file_begin] = source_bin[loop];

//---------------------------------------------------------------------------------------
//以上代码将word文档从二进制流中提取出来，存储在result[]中，方法虽笨，肯定好使
//本人不懂VB，更不懂Java，
//上面代码是我楞从梁无惧用VB写的无惧上传类V2.0里挑选有用的部分翻译成C#的，泪ing……
//看看人家梁兄，多无私，给同行提供这么好的东东
//我在网上找了N + 1天，就TM没找到C#版的，再泪ing……
//现在提供给大家，希望我是最后一个为此郁闷的人

      SqlConnection myConnection = new SqlConnection("Data Source=/"localhost/";Initial Catalog=/"demo/";Persist Security Info=True;User ID=demo;Password=demo");//数据库的相关设置自己改吧
      SqlCommand mycommand = myConnection.CreateCommand();
      mycommand.CommandText = "UPDATE Table_word SET filedata = @myfiledata , b_finished = 1 WHERE (ID = @myID)";
      mycommand.Parameters.Add("@myfiledata", SqlDbType.VarBinary, 0, "filedata");
      mycommand.Parameters.Add("@myID", SqlDbType.Int, 4, "ID");

      SqlDataAdapter mydpt;
      DataSet myds = new DataSet();

      mydpt = new SqlDataAdapter("SELECT ID ,filedata , b_finished FROM Table_copy  WHERE (ID = " + Request["id"] + ")", myConnection);
      myConnection.Open();

      mydpt.UpdateCommand = mycommand;
      mydpt.Fill(myds);
      DataTable mydt = myds.Tables[0];
      DataRow myrow;
      myrow = mydt.Rows[0];
      myrow.BeginEdit();
      myrow["filedata"] = result;
      myrow.EndEdit();

      mydpt.Update(myds);
      myConnection.Close();/**/
    }

至此，只要你指定的ID没问题，就应该可以保存Word文档了。

编辑Savedc.aspx.cs的Page_Load函数；
protected void Page_Load(object sender, EventArgs e)
------------------------------------------------------------------------------
果然是ASP的写法。不过c#里面不需要这样，C# 提供了这样的接口

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.Data.SqlClient;
using System.Data.OleDb;
using System.IO;

public partial class upload : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
      Response.Clear();
//ID为文档的主键，如果ID不为空，则更新数据，否则新建一条记录
      string ID = Request.Params["ID"];
      string DocID,DocTitle,DocType;
      DocID = "test";
      DocTitle = "test";
      if(ID != null && ID !=""){
         DocID = Request.Params["DocID"];
         DocTitle = Request.Params["DocTitle"];
      }
      DocType = Request.Params["DocType"];
      if(DocType == "")
         DocType =  "doc";

      DocType = DocType.Substring(0, 3);
      if (Request.Files.Count > 0)
      {
            OleDbConnection objConnection;

            HttpPostedFile upPhoto = Request.Files[0];
            int upPhotoLength = upPhoto.ContentLength;
            byte[] PhotoArray = new Byte[upPhotoLength];
            Stream PhotoStream = upPhoto.InputStream;
            PhotoStream.Read(PhotoArray, 0, upPhotoLength); //这些编码是把文件转换成二进制的文件

            string strConnection = "Provider=Microsoft.Jet.OleDb.4.0;";
            strConnection += @"Data Source=" + this.Server.MapPath("des.mdb");
            objConnection = new OleDbConnection(strConnection);
            objConnection.Open();

            string strSql;
            if (ID != null && ID != "")
            {
                  strSql = "update Doc Set DocContent  = @FImage where id = " + ID;
                  OleDbCommand comd = new OleDbCommand(strSql, objConnection); //执行sql语句
                  comd.Parameters.Add("@FImage", OleDbType.Binary);
                  comd.Parameters["@FImage"].Value = PhotoArray;
                  comd.ExecuteNonQuery(); //执行查询

            }
            else
            {
                  strSql = "Insert into Doc(DocID,DocTitle,DocType,DocContent) values(@DocId,@DocTitle,@DocType,@FImage)";
                  OleDbCommand comd = new OleDbCommand(strSql, objConnection); //执行sql语句
                  if(DocID != "")
                     comd.Parameters.Add("@DocId", OleDbType.VarChar, 20).Value = DocID;  //定义参数同时给它赋值
                  if (DocTitle != "")
                     comd.Parameters.Add("@DocTitle", OleDbType.VarChar, 50).Value = DocTitle;
                  comd.Parameters.Add("@DocType", OleDbType.VarChar, 10).Value = DocType;
                  comd.Parameters.Add("@FImage", OleDbType.Binary);
                  comd.Parameters["@FImage"].Value = PhotoArray;
                  comd.ExecuteNonQuery(); //执行查询
            }
            objConnection.Close();  //关闭数据库
            Response.Write("OK");
            Response.End();
         //-------------------------------------------
      }else{
         Response.Write("No File Upload!");
      }
}
}