هذا الكود ماشي معي تمام على localhost ومافي اي مشاكل
وهو عبارة عن نقل محتويات التكست بوكس الى الوورد
ولكن عند رفع البرنامج على السيرفر لايعمل نهائيا
Dim objword As New Microsoft.Office.Interop.Word.Application
objword = CreateObject("Word.Application")
objword.Visible = True
objword.Documents.Open(Server.MapPath("Reports/ktab.doc"))
Dim objrange = objword.Selection.Range
objword.ActiveDocument.Bookmarks("sub").Select()
objword.Selection.TypeText(TextBox4.Text)
objword.ActiveDocument.Bookmarks("head").Select()
objword.Selection.TypeText(TextBox1.Text)
objword.ActiveDocument.Bookmarks("text").Select()
objword.Selection.TypeText(TextBox2.Text)
objword.ActiveDocument.Bookmarks("teel").Select()
objword.Selection.TypeText(TextBox3.Text)
objword.ActiveDocument.Bookmarks("date").Select()
objword.Selection.TypeText(Date.Today)
objword.ActiveDocument.Bookmarks("num").Select()
objword.Selection.TypeText(Session("Nmum"))
objword.ActiveDocument.Bookmarks("num1").Select()
objword.Selection.TypeText(Session("Nmum"))
objword = Nothing