Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.
Private Sub ExportWord() Dim oWord As Word.Application = CreateObject("Word.Application") Dim oDoc As Word.Document = oWord.Documents.Add("\\myserver\my documents\Shared Interdepartmental Folders\Applications\Quote Form.dotx") oWord.Visible = True oDoc.Bookmarks.Item("QuoteNumber").Range.Text = txtMasterItemNo.Text & "-" & txtQuoteNumber.Text oDoc.Bookmarks.Item("QuoteDate").Range.Text = txtQuoteDate.Text oDoc.Bookmarks.Item("ExpirationDate").Range.Text = txtExpirationDate.Text oWord = Nothing oDoc = Nothing
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.