asp.net£¨VB£©ÈçºÎ½«wordÎĵµµÄÄÚÈݶÁµ½Ò³ÃæÖÐ
ÎÒ×öÍøÕ¾£¬Ïë×ö¸öwordÎĵµÔÚÒ³ÃæÖÐÏÔʾµÄЧ¹û£¬ÎÒÓöþ½øÖÆÁ÷¶ÁÈ¡wordÎĵµ£¬È»ºóÉèÖÃResponse.ContentType = "Application/msword"£¬¿ÉÒÔÏÔʾ£¬µ«ÊÇÏÔʾ³öÀ´µÄÒ³ÃæÊǿɱ༡¢¿ÉÐ޸ĵģ¬Çë¸ßÊÖÖ¸µã£¬ÓÐû°ì·¨£¬½«Ò³ÃæÉèΪ²»¿É±à¼µÄ...»òÕßÓÐÆäËû°ì·¨£¬¿ÉÒÔÔÚÒ³ÃæÏÔʾwordµÄÒ²ÐÐ...´úÂëÈçÏ£º
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Response.ClearContent()
Response.ClearHeaders()
Response.ContentType = "Application/msword"
Dim path As String = Server.MapPath("/JPing/qujintai.doc")
Dim objStream As FileStream
objStream = New FileStream(path, FileMode.Open, FileAccess.Read, FileShare.Read)
Dim imageBuffer(objStream.Length) As Byte
objStream.Read(imageBuffer, 0, objStream.Length)
objStream.Close()
Response.BinaryWrite(imageBuffer)
End Sub
ÄãÕâ¸ö×ö·¨ÊÇÖ±½ÓίÍÐwordÀ´´ò¿ªµÄ ÕâÖÖ´ò¿ª·½Ê½·þÎñÆ÷¶Ë²»¿É¿Ø
¼òµ¥µÄ·½·¨ ÄãÔÚÎĵµÖÐÉ趨±£»¤¾Í¿ÉÒÔÁË
¿ÉÊÇÎÒ×öµÄЧ¹ûÊÇÌṩ±ðÈËwordÉÏ´«µÄ¹¦ÄÜ£¬ÔÙÏÔʾÔÚÒ³Ãæ£¬×ܲ»¿ÉÄÜÎÒÿ¸ö¶¼ÉèÖñ£»¤°¡...
ÓÐûÓÐÆäËûµÄ°ì·¨£¬¿ÉÒÔÔÚÒ³ÃæÏÔʾword...
Ïà¹ØÎÊ´ð£º
Imports System.ComponentModel
Imports System.Web.UI
Imports System.Web.UI.Design
Imports System.Web.UI.WebControls
Namespace CBDAspNet.WebControls.HTML
''' <summary>
'' ......
ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æÍ¼°å£¨ÆÁÄ»,Piceure1£©µÄÒÆ¶¯ÎÊÌâÒѾ½â¾ö¡£
Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
Picture1.Left = -HScroll1.Value + bcW ' ......
Êý¾Ý¿â±íÖÐÓÐÒ»ÁУ¨TranXml£©ÀàÐÍÊÇxml£¬´æ´¢µÄÊÇÀàËÆ
<fathernode>
<a>aaa
</a>
<b>bbb
</b>
</fathernode>
µÄÐÅÏ¢£¬²¢ÇÒͨ¹ý²éѯ·½· ......
<table style="width: 1000px"><tr>
<td style="height: 38px; width: 35px;">
ÐÕÃû</td>
......