|
|
|
ASP.NET Word.Application กับภาษาไทย ผมได้ลองเขียน ASP.NET ร่วมกับ Word.Application โดยผมได้ลองเขียนโค๊ดตาม Tutorial |
|
|
|
|
|
|
|
ผมได้ลองเขียน ASP.NET ร่วมกับ Word.Application
โดยผมได้ลองเขียนโค๊ดตามTutorial ของเว็บ ก็ไม่มีปัญหาอะไร
ลิ๊งของ Tutorial : https://www.thaicreate.com/asp.net/asp.net-word-application-create-insert-table.html
แต่เมื่อผมได้ลองเปลี่ยนข้อความจากภาอังกฤษมาเป็นภาษาไทย ปรากฏว่า ข้อความที่สร้างออกมาใน Word ไม่เป็นไปตามที่ผมกำหนดไว้
จึงอยากถามผู้รู้ว่า มันเกิดขึ้นจากอะไรแล้วมีวิธีแก้เพื่อให้รูปแบบเป็นไปตามที่กำหนดได้อย่างไรครับ
Code (VB.NET)
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Wrd As New Microsoft.Office.Interop.Word.Application
Dim WrdDoc As Microsoft.Office.Interop.Word.Document
Dim WTable As Microsoft.Office.Interop.Word.Table
Dim DocName As String = "MyWord.doc"
Wrd.Application.Visible = False
DocName = "MyWord.doc"
WrdDoc = Wrd.Documents.Add()
WTable = WrdDoc.Tables.Add(Wrd.Selection.Range, 3, 3) ' Colums, Rows
WTable.Cell(1, 1).Range.Font.Name = "Angsana New"
WTable.Cell(1, 1).Range.Font.Size = 20
WTable.Cell(1, 1).Range.Bold = True
WTable.Cell(1, 1).Range.Font.Italic = True
WTable.Cell(1, 1).Range.Text = "ThaiCreate.Com 1"
WTable.Cell(1, 2).Range.Font.Name = "Angsana New"
WTable.Cell(1, 2).Range.Font.Size = 20
WTable.Cell(1, 2).Range.Bold = True
WTable.Cell(1, 2).Range.Font.Italic = True
WTable.Cell(1, 2).Range.Text = "ทดสอบ"
Wrd.ActiveDocument.SaveAs(Server.MapPath(DocName))
Wrd.Application.Quit()
Wrd = Nothing
End Sub
Tag : - - - -
|
|
|
|
|
|
Date :
2009-07-02 15:29:28 |
By :
freedomcs |
View :
1698 |
Reply :
2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ท่าน Import อะไรมาบ้างครับ
|
|
|
|
|
Date :
2010-06-18 14:32:12 |
By :
tungbig |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 02
|