Windows2000，Word2003，ASP.Net - 帮助

wrdLetter.Bookmarks.Item（" PCP"）。Range.Text = strEval wrdLetter.Bookmarks.Item（" Location"）。Range.Text = strLocationName wrdLetter.Bookmarks.Item（" TeacherNM"）。Range.Text = strTeacherName wrdLetter.SaveAs（strNewFilePath& NewFileName） wrdLetter.PrintPreview （） WrdApp_DocumentBeforeClose（wrdLetter，False） wrdLetter.Close（） System.Runtime.InteropServices.Marshal.ReleaseComO bject（wrdLetter） WrdApp.Application.Quit（） System.Runtime.InteropServices.Marshal.ReleaseComO bject（WrdApp） WrdApp = Nothing fileName = Nothing isVisible = Nothing readonlyAcc = Nothing isVisible, missing, missing) wrdLetter.Activate() wrdLetter.Bookmarks.Item("TodayDate").Range.Text = FormatDateTime(Date.Now(), DateFormat.ShortDate) wrdLetter.Bookmarks.Item("PatientNM").Range.Text = strPatientName wrdLetter.Bookmarks.Item("SSN").Range.Text = strPatientSSN wrdLetter.Bookmarks.Item("PCP").Range.Text = strEval wrdLetter.Bookmarks.Item("Location").Range.Text = strLocationName wrdLetter.Bookmarks.Item("TeacherNM").Range.Text = strTeacherName wrdLetter.SaveAs(strNewFilePath & NewFileName) wrdLetter.PrintPreview() ''WrdApp_DocumentBeforeClose(wrdLetter, False) wrdLetter.Close() System.Runtime.InteropServices.Marshal.ReleaseComO bject(wrdLetter) wrdLetter = Nothing WrdApp.Application.Quit() System.Runtime.InteropServices.Marshal.ReleaseComO bject(WrdApp) WrdApp = Nothing fileName = Nothing isVisible = Nothing readonlyAcc = Nothing 这篇关于Windows2000，Word2003，ASP.Net - 帮助的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！