Cara menggunakan ASP.NET atau Visual Basic.NET untuk mengubah XML untuk kaya Format teks untuk Microsoft Word 2002

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 311461 - Melihat produk di mana artikel ini berlaku.
Perbesar semua | Perkecil semua

Pada Halaman ini

RINGKASAN

Gunakan ini langkah demi langkah panduan untuk menghasilkan Rich Text Format (RTF) dari Extensible Markup Language (XML) dengan menggunakan Visual Basic.NET.

Rich Text Format adalah format berbasis teks yang encode diformat teks, tata letak dokumen, dan grafis. Ini umumnya digunakan dengan Microsoft Word. Karena RTF berbasis teks, itu dapat dengan mudah dihasilkan dengan kode. Jika Anda memiliki XML data bahwa Anda ingin menampilkan dalam kata sebagai katalog/daftar atau gabungan surat jenis dokumen, kemudian mengubah XML data menjadi arus RTF mungkin menjadi solusi ideal Untukmu. Dan, pada kenyataannya, jika Anda sedang mengembangkan sebuah solusi di mana Anda menghasilkan dokumen pada Web server, yang kemudian menghasilkan dokumen-dokumen yang menggunakan berbasis teks format, seperti HTML atau RTF, lebih disukai atas menggunakan sisi server Otomatisasi Kata.

Artikel ini menyediakan kode contoh, dengan langkah demi langkah petunjuk, untuk mengubah XML menjadi RTF untuk ditampilkan di Word dengan menggunakan beberapa pendekatan:
  • Menyimpan RTF file dan buka di Word.
  • Transfer RTF ke Word dengan menggunakan Windows Clipboard.
  • Streaming RTF kata host di Microsoft Internet Explorer dari ASP.Aplikasi NET Web.

Rich Text Format spesifikasi

Rich Text Format (RTF) spesifikasi adalah publik spesifikasi untuk menghasilkan kompatibel RTF file teks. Anda dapat menggunakan dokumentasi untuk spesifikasi pada Pengembang Microsoft berikut Situs Web Network (MSDN) sebagai sumber daya untuk membantu Anda membangun Anda sendiri RTF file. Namun, spesifikasi disediakan "sebagai-adalah", dan tidak ada dukungan yang diberikan oleh Dukungan teknis Microsoft untuk spesifikasi. Klik link berikut untuk spesifikasi RTF:
Rich Text Format spesifikasi, versi 1.6

Rich Text Format spesifikasi, versi 1,7

Mengubah XML untuk RTF

Anda dapat mengambil sah XML dari sumber dan mengubahnya ke RTF. Prosedur berikut menggambarkan bagaimana Anda dapat mengubah kustom XML menjadi RTF baik disimpan ke file atau disalin ke clipboard.
  1. Buat baru Visual Basic.NET Aplikasi Windows. Form1 dibuat untuk Anda.
  2. Menambahkan dua tombol kontrol untuk Form1.
  3. Pada Lihat menu, klik Kode.
  4. Masukkan berikut di bagian atas jendela kode sebelum pelaksanaan Form1 kelas:
    Imports System.Xml
    Imports System.Xml.Xsl
    Imports System.IO
  5. Tambahkan kode berikut untuk pelaksanaan Form1 kelas (sebelum Akhir kelas):
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Button1.Text = "To File"
            Button2.Text = "To Clipboard"
    
        End Sub
    
        Private Sub ButtonsClick(ByVal sender As System.Object, ByVal e As System.EventArgs) _
            Handles Button1.Click, Button2.Click
    
            Dim sPath As String = Directory.GetParent(Directory.GetCurrentDirectory()).ToString
    
            ' Open the XML file.
            Dim xmlDoc As New XmlDocument()
            xmlDoc.Load(sPath & "\Dictionary.xml")
    
            ' Open the XSL file.
            Dim xslDoc As New XslTransform()
            xslDoc.Load(sPath & "\Dictionary.xslt")
    
            Select Case sender.name
                Case "Button1"
                    ' Transform the XSL and save it to file.
                    Dim TWrtr As New XmlTextWriter(sPath & "\Dictionary.RTF", System.Text.Encoding.Default)
                    xslDoc.Transform(xmlDoc, Nothing, TWrtr, Nothing) 
                    TWrtr.Close()
                    MsgBox("Transformed RTF saved to " & sPath & "\Dictionary.RTF")
                Case "Button2"
                    ' Transform the XSL and copy it to the clipboard.
                    Dim SWrtr As New StringWriter()
                    xslDoc.Transform(xmlDoc, Nothing, SWrtr, Nothing)
                    Dim datObj As New DataObject(DataFormats.Rtf, SWrtr)
                    Clipboard.SetDataObject(datObj)
                    SWrtr.Close()
                    MsgBox("Transformed RTF copied to the clipboard.")
            End Select
    
        End Sub
  6. Menambahkan sebuah file XML untuk proyek Anda:
    1. Pada Project menu, klik Menambah Item baru.
    2. Dari daftar template, klik XML File.
    3. Ketik nama Dictionary.xml dan kemudian klik Terbuka.
    4. Tambahkan berikut untuk isi Dictionary.xml:
      <Dictionary>
        <Entries>
          <Entry>
            <Word Type="1">Energetic</Word>
            <Definition>Having, exerting, or displaying energy</Definition>
          </Entry>
          <Entry>
            <Word Type="1">Happy</Word>
            <Definition>Enjoying, displaying, or characterized by pleasure or joy</Definition>
          </Entry>
          <Entry>
            <Word Type="2">Emotion</Word>
            <Definition>A complex, strong subjective response</Definition>
          </Entry>
        </Entries>
      </Dictionary> 
  7. Menambahkan file XSLT untuk proyek Anda:
    1. Pada Project menu, klik Menambah Item baru.
    2. Dari daftar template, klik XSLT File.
    3. Ketik nama Dictionary.XSLTkemudian klik Terbuka.
    4. Mengganti isi Dictionary.xslt dengan berikut:
       
      <?xml version="1.0" encoding="UTF-8" ?>
      <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
      
      	<xsl:output method="text"/>
      	<xsl:template match="/">
      
      	<xsl:text>{\rtf1</xsl:text>
      
      	<xsl:for-each select="Dictionary/Entries/Entry">
      
      		<xsl:text>\par\b </xsl:text>
      		<xsl:value-of select="Word"/>
      		<xsl:text>\b0\i  </xsl:text> 
      		<xsl:if test="Word[@Type='1']">adj.</xsl:if>
      		<xsl:if test="Word[@Type='2']">n.</xsl:if>
      		<xsl:text>\i0\par </xsl:text>
      		<xsl:value-of select="Definition"/>
      		<xsl:text>\par</xsl:text>
      	</xsl:for-each>
      
      	<xsl:text>}</xsl:text>
      
      	</xsl:template>
      	
      </xsl:stylesheet>  
  8. Tekan F5 untuk membangun dan menjalankan program.
  9. Klik Untuk File untuk menyimpan XML berubah ke file (Dictionary.rtf). Kamu bisa Buka berkas RTF di Word untuk memeriksa hasil transformasi.
  10. Klik Ke Clipboard untuk menyalin XML berubah ke Windows clipboard. Kamu bisa kemudian menyisipkan konten clipboard ke dalam dokumen Word baru atau yang ada untuk melihat hasil.

Mengubah DataSet menjadi RTF

Visual Basic.NET memungkinkan Anda untuk dengan mudah melakukan transformasi pada dataset. Prosedur ini menunjukkan Anda bagaimana Anda dapat mengambil data yang terkait dari sampel Northwind database dan mengubahnya ke RTF. Dua yang berbeda transformasi menunjukkan: dokumen RTF sederhana yang berisi daftar pelanggan informasi kontak dan dokumen RTF agak lebih kompleks yang menampilkan informasi permintaan untuk pelanggan dalam format jenis gabungan surat.
  1. Mulai Visual Basic baru ASP.Aplikasi NET Web dan menyimpannya ke http://localhost/RTFDemo.

    WebForm1 dibuat untuk Anda.
  2. Menambahkan dua Tombol kontrol untuk WebForm1.
  3. Pada Lihat menu, klik Kode.
  4. Tambahkan kode berikut untuk Page_Load fungsi:
            Button1.Text = "View Contact Information"
            Button2.Text = "View Customer Orders"
  5. Tambahkan fungsi berikut untuk WebForm1 kelas.

    CATATAN: Kode berikut menganggap Anda memiliki SQL Server diinstal pada localhost. Jika Anda harus menggunakan komputer lain, mengubah sumber Data anggota koneksi string sesuai.
        Private Sub ButtonsClick(ByVal sender As System.Object, ByVal e As System.EventArgs) _
                Handles Button1.Click, Button2.Click
    
            ' Connect to the data source.
            Dim nwindConn As SqlConnection = New SqlConnection( _
                "Data Source=localhost;Initial Catalog=Northwind;Integrated Security=SSPI")
            nwindConn.Open()
    
            ' Build a dataset based on whether you requested to view a list of 
            ' orders or a list of contacts.
            Dim ds As DataSet
            Dim sXSL As String
            Select Case (sender.id)
    
                Case "Button1"
    
                    ds = New DataSet("Contacts")
                    Dim ContactsDA As SqlDataAdapter = New SqlDataAdapter("SELECT * FROM Customers", nwindConn)
                    ContactsDA.Fill(ds, "Customers")
                    ' XSLT to use for transforming this dataset.
                    sXSL = "Contacts.xslt"  
    
                Case "Button2"
    
                    ds = New DataSet("CustomerOrders")
    
                    Dim custDA As SqlDataAdapter = New SqlDataAdapter("SELECT CustomerID, CompanyName, " & _
                        "Address, City, Region, PostalCode, Country FROM Customers", nwindConn)
                    custDA.Fill(ds, "Customers")
    
                    Dim ordersDA As SqlDataAdapter = New SqlDataAdapter("SELECT OrderID, CustomerID, Freight " & _
                        "FROM Orders", nwindConn)
                    ordersDA.Fill(ds, "Orders")
    
                    Dim ordersdetailDA As SqlDataAdapter = New SqlDataAdapter( _
                        "SELECT [Order Details].OrderID, Products.ProductName, [Order Details].Quantity, " & _
                        "[Order Details].[UnitPrice]*[Quantity]*(1-[Discount]) AS ItemTotal " & _
                        "FROM Products INNER JOIN [Order Details] ON Products.ProductID = [Order Details].ProductID " _
                        , nwindConn)
    
                    ordersdetailDA.Fill(ds, "OrderDetails")
    
                    nwindConn.Close()
    
                    ds.Relations.Add("CustOrders", _
                    ds.Tables("Customers").Columns("CustomerID"), _
                    ds.Tables("Orders").Columns("CustomerID")).Nested = True
    
                    ds.Relations.Add("OrdersToOrdersDetail", _
                    ds.Tables("Orders").Columns("OrderID"), _
                    ds.Tables("OrderDetails").Columns("OrderID")).Nested = True
    
                    ' XSLT to use for transforming this dataset.
                    sXSL = "CustOrders.xslt" 
    
            End Select
    
            ' Close the connection to the data source.
            nwindConn.Close()
    
            ' Transform the dataset by using the appropriate stylesheet.
            Dim xmlDoc As XmlDataDocument = New XmlDataDocument(ds)
            Dim xslTran As XslTransform = New XslTransform()
            xslTran.Load(Server.MapPath(sXSL))
    
            ' Stream the results of the transformation to Word.
            Response.ContentType = "application/msword"
            Response.Charset = ""
            Response.ContentEncoding = System.Text.Encoding.Default
            xslTran.Transform(xmlDoc, Nothing, Response.Output)
    
        End Sub
  6. Menambahkan baris kode berikut di bagian atas WebForm1.aspx.vb, sebelum WebForm1 kelas implementasi:
    Imports System.Data.SqlClient
    Imports System.Xml
    Imports System.Xml.Xsl
  7. Pada Project menu, klik Menambah Item baru. Dari daftar template, klik XSLT File, nama berkas Contacts.XSLT, lalu klik Terbuka.
  8. Ganti isi Contacts.xslt dengan berikut:
    <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" 
    	xmlns:msxsl="urn:schemas-microsoft-com:xslt" xmlns:user="urn:my-scripts" >   
    
    <xsl:output method="text"/>
    
    <xsl:template match="/">
    
    	<xsl:text>{\rtf1</xsl:text>
    	
        <xsl:text>{\fonttbl{\f0\froman\fcharset0\fprq2 Times New Roman;}{\f1\fswiss\fcharset0\fprq2 Arial;}}</xsl:text>
        
    	<xsl:text>{\header\pard\fs50 My Customer Contacts}</xsl:text>
    	
    	<xsl:text>{\footer\pard\fs18 Page {\field{\*\fldinst PAGE}</xsl:text>
    	<xsl:text>{\fldrslt }} of {\field{\*\fldinst NUMPAGES}{\fldrslt 1}} \par}</xsl:text>
    	
    	<xsl:text>\f1\fs20</xsl:text>
    	
        <xsl:for-each select="Contacts/Customers">
    		<xsl:text>\par\b </xsl:text><xsl:value-of select="CustomerID"/><xsl:text>\b0</xsl:text>
    		<xsl:text>\par </xsl:text><xsl:value-of select="CompanyName"/>
    		<xsl:text>\par </xsl:text><xsl:value-of select="ContactName"/>
    		<xsl:text>\par </xsl:text><xsl:value-of select="Phone"/>
    		<xsl:text>\par</xsl:text>
        </xsl:for-each>
    	      
    	<xsl:text>}</xsl:text>
    
    </xsl:template>
    
    <xsl:template match="Customers">
    
        <xsl:text>\par\b </xsl:text><xsl:value-of select="CustomerID"/><xsl:text>\b0</xsl:text>
        <xsl:text>\par </xsl:text><xsl:value-of select="CompanyName"/>
        <xsl:text>\par </xsl:text><xsl:value-of select="ContactName"/>
        <xsl:text>\par </xsl:text><xsl:value-of select="Phone"/>
        <xsl:text>\par</xsl:text>
    
    </xsl:template>
    
    </xsl:stylesheet> 
  9. Pada Project menu, klik Menambah Item baru. Dari daftar template, klik XSLT File, nama berkas CustOrders.xslt, lalu klik Terbuka.
  10. Ganti isi CustOrders.xslt dengan berikut:
    <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" 
    	xmlns:msxsl="urn:schemas-microsoft-com:xslt" xmlns:user="urn:my-scripts" >   
    
    <xsl:output method="text"/>
    
    <msxsl:script language="VB" implements-prefix="user">
        Dim CustomerTotal as Double = 0
        Dim OrderSubtotal as Double = 0
        
        Function AddToOrderSubtotal(amt)
            amt.MoveNext
            OrderSubtotal = OrderSubtotal + System.Convert.ToDouble(amt.Current.Value)
        End Function
        
        Function GetOrderSubtotal
    		GetOrderSubtotal = OrderSubtotal
        End Function
        
        Function GetCustomerTotal
    		GetCustomerTotal = CustomerTotal
    		CustomerTotal = 0
    	End Function
    	
        Function GetOrderTotal(freight)
           freight.MoveNext
           nFreight = System.Convert.ToDouble(freight.Current.Value)
           GetOrderTotal = nFreight + OrderSubtotal
           CustomerTotal = nFreight + OrderSubtotal + CustomerTotal
           OrderSubtotal = 0  
        End Function
            
    </msxsl:script>
    
    <xsl:template match="CustomerOrders">
    
    	<xsl:text>{\rtf1</xsl:text>
    	
    	<xsl:text>{\colortbl;\red0\green0\blue0;\red0\green0\blue255;\red0\green255\blue255;
    	\red0\green255\blue0;\red255\green0\blue255;\red255\green0\blue0;\red255\green255\blue0;
    	\red255\green255\blue255;\red221\green221\blue221;}</xsl:text>
    	
    	<xsl:text>{\info{\title Sample RTF Document}{\author Microsoft Developer Support}}</xsl:text>
    	
    	<xsl:text>{\header\pard\qc{\fs50 ASP-Generated RTF\par}{\fs18\chdate\par}\par\par}</xsl:text>
    	
    	<xsl:text>{\footer\pard\qc\brdrt\brdrs\brdrw10\brsp100\fs18 Page {\field{\*\fldinst PAGE}</xsl:text>
    	<xsl:text>{\fldrslt }} of {\field{\*\fldinst NUMPAGES}{\fldrslt 1}} \par}</xsl:text>
    	
    	<xsl:apply-templates select="Customers"/>
    	      
    	<xsl:text>}</xsl:text>
    
    </xsl:template>
    
    <xsl:template match="Customers">
    
        <xsl:text>\par\pard\fs20\cf2\qr\b </xsl:text><xsl:value-of select="CustomerID"/><xsl:text>\cf0\b0</xsl:text>
        <xsl:text>\par\pard </xsl:text><xsl:value-of select="CompanyName"/>
        <xsl:text>\par </xsl:text><xsl:value-of select="Address"/>
        <xsl:text>\par </xsl:text><xsl:value-of select="City"/>
        <xsl:text>, </xsl:text><xsl:value-of select="Region"/>
        <xsl:text> </xsl:text><xsl:value-of select="PostalCode"/>
        <xsl:text>\par </xsl:text><xsl:value-of select="Country"/>
        <xsl:text>\par\par</xsl:text>
    
    	<xsl:apply-templates select="Orders"/>
    
    	<xsl:text>\trowd\cellx7000\cellx9000\pard\intbl\ql\b\cbpat1 </xsl:text>
    	<xsl:text>Order Total for the Current Period:\cell </xsl:text>
    	<xsl:text>\qr</xsl:text>
    	<xsl:variable name="CustTtl" select="user:GetCustomerTotal()"/>
    	<xsl:value-of select="format-number($CustTtl,'$###0.00')"/>
    	<xsl:text>\cell</xsl:text>
    	<xsl:text>\pard\intbl\row</xsl:text>
    		
    	<xsl:text>\pard\par\pard</xsl:text>
    	<xsl:text>\pard\plain\fs18\cf6\qc</xsl:text>
    	<xsl:choose>
    		<xsl:when test="$CustTtl = 0">
             <xsl:text>\b We've missed hearing from you!\b0 </xsl:text>
             <xsl:text> At your convenience, please call your personal sales representative </xsl:text>
             <xsl:text>so that we may discuss our specials for new and returning customers!</xsl:text>
          </xsl:when>
          <xsl:when test="$CustTtl > 2000">
             <xsl:text>\b Congratulations!\b0  Your purchases for this period qualify you for a \b 20%\b0 </xsl:text>
             <xsl:text> discount on one of your next orders. To take advantage of this offer, provide </xsl:text>
             <xsl:text>the coupon code ABC123XYZ when placing your order.</xsl:text>
          </xsl:when>
          <xsl:otherwise>
             <xsl:text> We value your patronage with Northwind Traders and would love to hear from you. </xsl:text>
             <xsl:text>If you have any questions about our upcoming line of products or if you want </xsl:text>
             <xsl:text>a catalog for the coming season, call 1-888-000-000.</xsl:text>
          </xsl:otherwise>
        </xsl:choose>
    	<xsl:text>\par\pard</xsl:text>
    	<xsl:text>\par \page</xsl:text>
    
    </xsl:template>
    
    <xsl:template match="Orders">
    
    	<xsl:text>\trowd\cellx9000\pard\intbl\cbpat9</xsl:text>
    	<xsl:text>\ql\b </xsl:text><xsl:value-of select="OrderID"/><xsl:text>\b0\cell </xsl:text>
    	<xsl:text>\pard\intbl\row</xsl:text>
    	
    	<xsl:apply-templates select="OrderDetails"/>
    
    	<xsl:text>\trowd\cellx7000\cellx9000\pard\intbl</xsl:text>
    	<xsl:text>\qr Subtotal:\cell </xsl:text>
    	<xsl:value-of select="format-number(user:GetOrderSubtotal(),'$###0.00')"/><xsl:text>\cell</xsl:text>	
    	<xsl:text>\pard\intbl\row</xsl:text>
    		
    	<xsl:text>\trowd\cellx7000\cellx9000\pard\intbl</xsl:text>
    	<xsl:text>\qr Freight:\cell </xsl:text>
    	<xsl:value-of select="format-number(Freight,'$###0.00')"/><xsl:text>\cell</xsl:text>	
    	<xsl:text>\pard\intbl\row</xsl:text>
    
    	<xsl:text>\trowd\cellx7000\cellx9000\pard\intbl</xsl:text>
    	<xsl:text>\qr Total:\cell </xsl:text>
    	<xsl:value-of select="format-number(user:GetOrderTotal(Freight), '$###0.00')"/><xsl:text>\cell</xsl:text>	
    	<xsl:text>\pard\intbl\row</xsl:text>
    		
    	<xsl:text>\trowd\cellx9000\pard\intbl \cell\pard\intbl\row</xsl:text>
    	
    </xsl:template>
    
    <xsl:template match="OrderDetails">
    
    	<xsl:text>\trowd\cellx5000\cellx7000\cellx9000\pard\intbl\ql </xsl:text>
    	<xsl:value-of select="ProductName"/><xsl:text>\cell </xsl:text>
    	<xsl:text>\qc </xsl:text><xsl:value-of select="Quantity"/><xsl:text>\cell </xsl:text>
    	<xsl:text>\qr </xsl:text>
    	<xsl:value-of select="format-number(ItemTotal,'$###0.00')"/><xsl:text>\cell</xsl:text>
    	<xsl:variable name="RunTotal" select="user:AddToOrderSubtotal(ItemTotal)"/>
    	<xsl:text>\pard\intbl\row</xsl:text>
    
    </xsl:template>
    
    </xsl:stylesheet>
  11. Pada Bangun menu, klik Membangun solusi.
  12. Jalankan Internet Explorer dan browse ke http://localhost/RTFDemo/Webform1.aspx.
  13. Klik Lihat kontak informasi untuk melihat transformasi XML pertama untuk RTF di Word.
  14. Klik Kembali di Internet Explorer.
  15. Klik Lihat pesanan pelanggan untuk melihat transformasi XML kedua untuk RTF di Word.

RTF pemecahan masalah Tips

  • Seperti yang ditulis, kode contohMengubah DataSet menjadi RTFbagian, aliran RTF langsung ke browser. Atau, Anda dapat menyimpan RTF file dan redirect ke file disimpan. Untuk melakukannya, ganti baris ini kode dalam sampel
    Response.ContentType = "application/msword"
    Response.ContentEncoding = System.Text.Encoding.Default
    Response.Charset = ""
    xslTran.Transform(xmlDoc, Nothing, Response.Output)
    dengan:
    Dim writer As XmlTextWriter = New XmlTextWriter( _
            Server.MapPath("Results.doc"), System.Text.Encoding.Default)
    xslTran.Transform(xmlDoc, Nothing, writer)
    writer.Close()
    Response.Redirect("Results.doc")
    Menyimpan RTF file dengan cara ini memungkinkan Anda untuk dengan mudah memeriksa struktur RTF file dengan menggunakan editor teks, seperti Notepad. Menyimpan RTF file dapat membantu teknik pemecahan masalah jika XSL transformasi tidak menghasilkan hasil yang Anda harapkan.
  • Ketika mengubah untuk RTF, akan menyadari bagaimana Anda menampilkan spasi dan kereta kembali dalam stylesheet Anda karena itu dapat mempengaruhi bagaimana Kata menafsirkan RTF Anda. Kedua contoh kode ini artikel penggunaan <xsl:text></xsl:text> elemen karena memaksa informasi ruang putih di dalamnya menjadi dipertahankan.
  • Penggunaan <xsl:output method="text"></xsl:output> dalam stylesheet Anda untuk memastikan bahwa XML Anda berubah ke teks (bukan XML, yang merupakan metode output standar). Jika Anda tidak menentukan teks sebagai metode output, XML pengolahan petunjuk dapat ditambahkan ke berkas. Ini dapat mencegah kata dengan benar interpeting teks sebagai RTF.

REFERENSI

Untuk informasi tambahan tentang sisi server Otomatisasi dari Microsoft Word dan aplikasi Office lainnya, klik nomor artikel di bawah ini untuk melihat artikel di dalam Basis Pengetahuan Microsoft:
257757 INFO: Pertimbangan untuk otomatisasi Office sisi Server
Untuk informasi tambahan tentang penggunaan RTF dalam solusi Anda, klik artikel nomor di bawah ini untuk melihat artikel di dalam Basis Pengetahuan Microsoft:
270906 HOWTO: Menggunakan ASP untuk menghasilkan Rich Text Format (RTF) dokumen ke sungai untuk Microsoft Word
258513 HOWTO: Paste RichText diformat String ke kata dengan Visual Basic otomatisasi
Untuk informasi tambahan tentang transformasi XML dengan menggunakan Visual Dasar.NET, klik nomor artikel di bawah ini untuk melihat artikel di Microsoft Basis Pengetahuan:
300934 CARA: Menerapkan transformasi XSL XML untuk Streaming dengan menggunakan Visual Basic.NET
300929 CARA: Menerapkan transformasi XSL dari dokumen XML untuk dokumen XML dengan menggunakan Visual Basic.NET

Properti

ID Artikel: 311461 - Kajian Terakhir: 24 September 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Office Word 2007
  • Microsoft Visual Basic .NET 2002 Standard Edition
  • Microsoft ASP.NET 1.0
  • Microsoft Word 2002
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft ASP.NET 1.1
Kata kunci: 
kbhowto kbmt KB311461 KbMtid
Penerjemahan Mesin
PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.
Klik disini untuk melihat versi Inggris dari artikel ini:311461

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com