Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. chrismanster

    DSN Connection for MailMerge

    Thanks, I changed those constants to the numeric values and it worked perfectly.
  2. chrismanster

    Why doesn't this line work?

    It should also be the following strDrive = Chr(Asc(Left(strDrive,1))-1) & ":
  3. chrismanster

    Why doesn't this line work?

    You probably should break it out so that if anyone ever has to update or edit your code it will be more readable.
  4. chrismanster

    DSN Connection for MailMerge

    Error Number: 4198 Error Description: Command Failed It is this line: .OpenDataSource "", wdOpenFormatAuto, false, true, false, false, "", "", true, "", "", "DSN=<dsn_here>;UID=<uid>;PWD=<password>", "SELECT * FROM EMP WHERE EMPNO = " & id, "", false, wdMergeSubTypeWord
  5. chrismanster

    DSN Connection for MailMerge

    I am trying to connect to a data source via a DSN connection, when the OpenDataSource command executes, the script crashes. Here is the code: Sub GenerateDocument(id) Dim oApp, oDoc, oSel Set oApp = CreateObject("Word.Application") Set oDoc = oApp.Documents.Add With...

Part and Inventory Search

Back
Top