Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,036

HOME > ASP > ASP Word (Word.Application) > ASP & Word (Word.Application) - Open Document (Documents.Open)

ASP & Word (Word.Application) - Open Document (Documents.Open)

ASP & Word (Word.Application) - Open Document (Documents.Open) ตัวอย่างนี้จะเป็นการเขียน ASP กับ Word โดยทำการเปิดเอกสาร .doc หรือ .dot มาแก้ไขหรือเขียนข้อมูลลงไป

การใช้วิธีเปิด Template หรือ เอกสาร Word ที่มีอยู่ มีประโยชน์ตรงนี้ เราสามารถออกแบบตัว Template ไว้ล่วงหน้่า เช่น ตั้งค่าหน้ากระดาษให้เป็น แนวนอน (Landscape) หรือตั้งค่าหน้ากระดาษ หัวกระดาษ ท้ายกระดาษ ได้อย่างอีสระ และเมื่อมีการเปิด Template ขึ้นมาแล้วก็จะเขียนเพิ่มลงในเฉพาะตำแหน่งที่ต้องการ แล้วทำการ Save เป็นไฟล์ใหม่ ก็จะได้เอกสารในรูปแบบที่ต้องการทุกประการ

Config Word.Application

https://www.thaicreate.com/asp/asp-config-word.application.html

AspWordOpenDoc.asp

<% Option Explicit %>
<html>
<head>
<title>ThaiCreate.Com ASP & Word.Application</title>
</head>
<body>
<%
	Const wdAlignParagraphCenter = 1

	Dim Wrd,WrdDoc,DocName
	Dim MyRange1
	Set Wrd = CreateObject("Word.Application")
	DocName = "MyDoc/MyWord.doc"
	Wrd.Application.Visible = False

	Set WrdDoc = Wrd.Documents.Open(Server.MapPath("thaicreate.dot"))
	
	Set MyRange1 = WrdDoc.Range()
	With MyRange1
		.ParagraphFormat.Alignment = wdAlignParagraphCenter
		.Font.Name = "Verdana"
		.Font.Size = "30"		
		.Font.Bold = True
		.InsertBefore(vbCrLf&vbCrLf&"www.ThaiCreate.Com"&vbCrLf&"Version 2009"&vbCrLf)
	End With

	Set MyRange1 = WrdDoc.Paragraphs.Add.Range
	MyRange1.InlineShapes.AddPicture Server.MapPath("thaicreate-2009.gif")


	Set MyRange1 = WrdDoc.Paragraphs.Add.Range
	With MyRange1
		.ParagraphFormat.Alignment = wdAlignParagraphCenter
		.Font.Name = "Verdana"
		.Font.Size = "13"		
		.Font.Bold = True
		.InsertBefore(vbCrLf&vbCrLf&vbCrLf&vbCrLf&"All Rights Reserved.")
	End With

	WrdDoc.SaveAs(Server.MapPath(DocName))
	Wrd.Application.Quit
	Set Wrd = Nothing
%>
Word Created <a href="<%=DocName%>">Click here</a> to Download.
</body>
</html>

Screenshot

ASP & Word

ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท

ลองใช้ค้นหาข้อมูล


	By :	ThaiCreate.Com Team (บทความเป็นลิขสิทธิ์ของเว็บไทยครีเอทห้ามนำเผยแพร่ ณ เว็บไซต์อื่น ๆ)
	Score Rating :
	Create/Update Date :	2008-10-14 21:44:40 / 2010-12-06 07:49:31
	Download :

Sponsored Links / Related

ASP Word Response.ContentType = "application/vnd.ms-word"
Rating :

ASP Config Word (Word.Application)
Rating :

ASP Connect to Word.Application
Rating :

ASP & Word (Word.Application) - Create Word Document
Rating :

ASP & Word (Word.Application) - Page Setup
Rating :

ASP & Word (Word.Application) - BuiltInDocumentProperties
Rating :

ASP & Word (Word.Application) - Font & Style
Rating :

ASP & Word (Word.Application) - Paragraphs & Range
Rating :

ASP & Word (Word.Application) - Page Breaking
Rating :

ASP & Word (Word.Application) - Create/Insert Table (Tables.Add)
Rating :

ASP & Word (Word.Application) - Add/Insert Picture (AddPicture)
Rating :

ASP & Word (Word.Application) - Word Document Sample Report
Rating :

ASP & Word (Word.Application) - Convert and Send Email Attachment
Rating :

สอน Windows Phone การเขียนโปรแกรม Windows Phone 7 และ 8

สอน Java GUI การเขียนโปรแกรม ภาษา Java GUI

Free Tutorial

	สอน Google Maps Api
	สอน Windows Service
	สอน Entity Framework
	สอน Android
	สอน Java เขียน Java
	Java GUI Swing
	สอน JSP (Web App)
	iOS (iPhone,iPad)
	Windows Phone
	Windows Azure
	Windows Store
	Laravel Framework
	Yii PHP Framework
	สอน jQuery
	สอน jQuery กับ Ajax
	สอน PHP OOP (Vdo)
	Ajax Tutorials
	SQL Tutorials
	สอน SQL (Part 2)
	JavaScript Tutorial
	Javascript Tips
	VBScript Tutorial
	VBScript Validation
	Microsoft Access
	MySQL Tutorials
	-- Stored Procedure
	MariaDB Database
	SQL Server Tutorial
	SQL Server 2005
	SQL Server 2008
	SQL Server 2012
	-- Stored Procedure
	Oracle Database
	-- Stored Procedure
	SVN (Subversion)
	แนวทางการทำ SEO
	ปรับแต่งเว็บให้โหลดเร็ว