Jump to content

BillyNelson

Members
  • Posts

    8
  • Joined

  • Last visited

BillyNelson's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. I have confirmed that the string is in the 32 bit portion of the registry.
  2. I am attempting to capture an uninstall string from the registry. So long as I am capturing the values in a key that isn't wrapped in {} it works fine. When it is wrapped in {} it returns blank. $Reg = "HKLM\SOFTWARE\" $var = RegRead($Reg & "Microsoft\Windows\CurrentVersion\Uninstall\{0D94F75A-0EA6-4951-B3AF-B145FA9E05C6}", "UninstallString") MsgBox(4096, "Program files are in:", $var) Any help here would be greatly appreciated.
  3. That didn't help. I am going to uninstall this version and reinstall the old version and see if it gets resolved.
  4. Here is the error log of a condensed version of the script. It is only copying one doc and gathering and updating one piece of the data Below I will add the test script as it sits right now. >"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "F:AutoITtestdocs.au3" /UserParams +>15:28:14 Starting AutoIt3Wrapper v.2.1.0.33 Environment(Language:0409 Keyboard:00000409 OS:WIN_7/Service Pack 1 CPU:X64 OS:X64) >Running AU3Check (1.54.19.0) from:C:Program Files (x86)AutoIt3 +>15:28:14 AU3Check ended.rc:0 >Running:(3.3.6.1):C:Program Files (x86)AutoIt3autoit3_x64.exe "F:AutoITtestdocs.au3" --> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop --> Word.au3 Error from function _WordDocOpen, $_WordStatus_InvalidObjectType --> Word.au3 Error from function _WordDocGetCollection, $_WordStatus_InvalidObjectType --> Word.au3 Error from function _WordDocFindReplace, $_WordStatus_InvalidDataType +>15:28:18 AutoIT3.exe ended.rc:0 #NoTrayIcon #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=DocsCopy.ico #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <Date.au3> #include <File.au3> #include <WindowsConstants.au3> #include <Word.au3> #include <Excel.au3> ;------------------------------------------------------ ; Getting Customer Name for Directory Creation ;------------------------------------------------------ $Cust = InputBox ("Customer Name", "Customer Name") $Location = InputBox ("Customer Location", "Customer Location") ;------------------------------------------------------ ; Create Directory for Document Storage ; ----------------------------------------------------- DirCreate ("D:Documents" & $Cust) $Doclocale = ("D:Documents" & $Cust) ;------------------------------------------------------ ; Copy Engagement Docs ;------------------------------------------------------ FileCopy ("C:ConsultDocs*.*", $Doclocale) ;FileMove ($DocLocale & "Daily Status.xls", $DocLocale & "" & $Cust & " Daily Status.xls") FileMove ($DocLocale & "Project Completion document.doc", $DocLocale & "" & $Cust & " Project Completion document.doc") ;FileMove ($DocLocale & "Health Check.docx", $DocLocale & "" & $Cust & " Health Check.docx") ;FileMove ($DocLocale & "Server Installation and Production Server Layout.docx", $DocLocale & "" & $Cust & " Server Installation and Production Server Layout.docx") ;------------------------------------------------------- ; Gather project information ;------------------------------------------------------- ;$oDStatus = ($DocLocale & "" & $Cust & " Daily Status.xls") $oProjDoc = ($DocLocale & "" & $Cust & " Project Completion document.doc") ;$oHlthDoc = ($DocLocale & "" & $Cust & " Health Check.docx") ;$oLayout = ($DocLocale & "" & $Cust & " Server Installation and Production Server Layout.docx") $oStartDate = Inputbox ("Start Date", "Start Date") ;$oEndDate = InputBox ("End Date", "End Date") ;$oConsultant = InputBox ("Consultant Name", "Consultant Name") ;$oSOWDate = InputBox ("SOW Date", "SOW Date") ;-------------------------------------------------------- ; Update Project Completion Document ;-------------------------------------------------------- $oWordApp = _WordCreate($oProjDoc,0, 0) $oWord = _WordDocOpen($oWordApp, $oProjDoc) _WordDocFindReplace($oWord, "RefStartDate", $oStartDate)
  5. #NoTrayIcon #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=DocsCopy.ico #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include #include #include #include #include ;------------------------------------------------------ ; Getting Customer Name for Directory Creation ;------------------------------------------------------ $Cust = InputBox ("Customer Name", "Customer Name") $Location = InputBox ("Customer Location", "Customer Location") ;------------------------------------------------------ ; Create Directory for Document Storage ; ----------------------------------------------------- DirCreate ("D:Documents" & $Cust) $Doclocale = ("D:Documents" & $Cust) ;------------------------------------------------------ ; Copy Engagement Docs ;------------------------------------------------------ FileCopy ("C:ConsultDocs*.*", $Doclocale) FileMove ($DocLocale & "Daily Status.xls", $DocLocale & "" & $Cust & " Daily Status.xls") FileMove ($DocLocale & "Project Completion document.doc", $DocLocale & "" & $Cust & " Project Completion document.doc") FileMove ($DocLocale & "Health Check.docx", $DocLocale & "" & $Cust & " Health Check.docx") FileMove ($DocLocale & "Server Installation and Production Server Layout.docx", $DocLocale & "" & $Cust & " Server Installation and Production Server Layout.docx") ;------------------------------------------------------- ; Gather project information ;------------------------------------------------------- $oDStatus = ($DocLocale & "" & $Cust & " Daily Status.xls") $oProjDoc = ($DocLocale & "" & $Cust & " Project Completion document.doc") $oHlthDoc = ($DocLocale & "" & $Cust & " Health Check.docx") $oLayout = ($DocLocale & "" & $Cust & " Server Installation and Production Server Layout.docx") $oStartDate = Inputbox ("Start Date", "Start Date") $oEndDate = InputBox ("End Date", "End Date") $oConsultant = InputBox ("Consultant Name", "Consultant Name") $oSOWDate = InputBox ("SOW Date", "SOW Date") ;-------------------------------------------------------- ; Update Project Completion Document ;-------------------------------------------------------- $oWordApp = _WordCreate ($oProjDoc) $oDoc = _WordDocGetCollection ($oWordApp, 0) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc, "RefStartDate", $oStartDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc, "RefEndDate", $oEndDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc, "RefConsultant", $oLDConsultant) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc, "RefSOWDate", $oSOWDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc, "RefCustomerName", $Cust) _WordDocSave($oDoc) _WordDocClose ($oDoc) ConsoleWrite(@error & @CRLF) ;------------------------------------------------------------ ; Update Health Check Document ;------------------------------------------------------------ $oWordApp1 = _WordCreate ($oHlthDoc) $oDoc1 = _WordDocGetCollection ($oWordApp1, 0) ;$oWordApp = _WordCreate ($oProjDoc) ConsoleWrite(@error & @CRLF) $oDoc1 = _WordDocGetCollection ($oWordApp1, 0) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc1, "RefStartDate", $oStartDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc1, "RefEndDate", $oEndDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc1, "RefConsultant", $oLDConsultant) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc1, "RefSOWDate", $oSOWDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc1, "RefCustomerName", $Cust) _WordDocFindReplace( $oDoc1, "refLocation", $Location) _WordDocSave($oDoc1) _WordDocClose ($oDoc1) ConsoleWrite(@error & @CRLF) ;------------------------------------------------------------ ; Update Daily Status Report ;------------------------------------------------------------ $rRowNum = "3H" $oExcel = _ExcelBookOpen ($oDStatus) _ExcelWriteCell ($oExcel, $oConsultant, 3, 8 ) _ExcelWriteCell ($oExcel, $Cust, 2, 8 ) _ExcelWriteCell ($oExcel, $oStartDate, 5, 8 ) _ExcelWriteCell ($oExcel, $oEndDate, 6, 8 ) _ExcelBookSave ($oExcel) _ExcelBookClose ($oDStatus) ConsoleWrite(@error & @CRLF) ;--------------------------------------------------------------------- ; Update LANDesk Core Server Installation and Production Server Layout ;--------------------------------------------------------------------- $oWordApp2 = _WordCreate ($oLayout) $oDoc2 = _WordDocGetCollection ($oWordApp2, 0) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc2, "RefStartDate", $oStartDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc2, "RefEndDate", $oEndDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc2, "RefConsultant", $oLDConsultant) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc2, "RefSOWDate", $oSOWDate) ConsoleWrite(@error & @CRLF) _WordDocFindReplace( $oDoc2, "RefCustomerName", $Cust) _WordDocFindReplace( $oDoc2, "refLocation", $Location) _WordDocSave($oDoc2) _WordDocClose ($oDoc2) ConsoleWrite(@error & @CRLF)
  6. I have a script that asks a series of questions and then opens a few documents and replaces values with the gathered data. Today I installed the latest version of AutoIT and then opened the script and added a new icon to it. After saving it I found that the script no longer updates the word documents. The Excel Documents update with no problem, the files are copied and renamed with no problem, but the word documents are no longer updating.example.au3 Any help will be greatly appreciated. As well, I have another script that asks which customer I am working with and then opens a GUI listing the available documents. The documents no longer open when I click on them, but we'll look at that after I get this fixed.
  7. Water, Thank you a million times over.
  8. I copy and change the same 3 documents each week according to which customer I am working with. I have a script that creates a new directory and copies the documents. It renames the docs according to the customer name and now I want to add info into one particular document. I have input boxes gathering data such as Project Start and End Dates and I want to auto populate the document with that info. I am having trouble figuring this out. I have everything working but the replacing of the text. #include <Date.au3> #include <File.au3> #include <WindowsConstants.au3> #NoTrayIcon #include <Word.au3> ;------------------------------------------------------ ; Getting Customer Name for Directory Creation ;------------------------------------------------------ $Cust = InputBox ("Customer Name", "Customer Name") ;------------------------------------------------------ ; Create Directory for Document Storage ; ----------------------------------------------------- DirCreate ("D:\Documents\" & $Cust) $Doclocale = ("D:\Documents\" &$Cust) ;------------------------------------------------------ ; Copy Engagement Docs ;------------------------------------------------------ FileCopy ("C:\Users\bnelson\Downloads\ConsultingDocs\Documentation - Master\AllEngaments\*.*", $Doclocale) FileMove ($DocLocale & "\Daily Status.xls", $DocLocale & "\" & $Cust & " Daily Status.xls") FileMove ($DocLocale & "\Project Completion document.doc", $DocLocale & "\" & $Cust & " Project Completion document.doc") FileMove ($DocLocale & "\Heclth Check.docx", $DocLocale & "\" & $Cust & " Health Check.docx") ;------------------------------------------------------- ; Edit Project Completion Document to reflect project information ;------------------------------------------------------- $oProjDoc = ($DocLocale & "\" & $Cust & " Project Completion document.doc") $oStartDate = Inputbox ("Start Date", "Start Date") $oEndDate = InputBox ("End Date", "End Date") $oLDConsultant = ("Billy Nelson") $oSOWDate = InputBox ("SOW Date", "SOW Date") $oWordApp = _WordCreate ($oProjDoc) $oDoc = _WordDocGetCollection ($oWordApp, 0) _WordDocFindReplace( $oProjDoc, "RefStartDate", $oStartDate) _WordDocFindReplace( $oProjDoc, "RefEndDate", $oEndDate) _WordDocFindReplace( $oProjDoc, "RefConsultant", $oLDConsultant) _WordDocFindReplace( $oProjDoc, "RefSOWDate", $oSOWDate) _WordDocSave ($oProjDoc)
×
×
  • Create New...