atnextc Posted May 15, 2013 Share Posted May 15, 2013 (edited) I have a project that I am working on in which I am trying to do the following: 1. Open project page "in background" 2. Read values to see if criteria is there 3. Set values above as variable to be written to file 4. Be able to update one or several of those values in the background as well and save the page "mediawiki" in the background un-noticeable to the user. I do not code written for this part yet as I am confused on where to start. I've read about "reg ex" "_IEgetsource" and all the parsing html posts on the forums, I just don't understand it. I will post below the html code in question and the values that I am trying to retrieve. Right now I have another script that the user has to manually look at this page and copy and paste these values into my script to auto generate the file. I thought well thats stupid it's already there there has to be a way to be able to just read it from the webpage automatically, this would prevent user error in typo'ing something. The Values I'm interested in are as follows: This is viewed as a table in IE with one side being A. and the other side being Z. Everything under #1 needs to be viewed as a value for "Z" side as well. Any help would be greatly appreciated. 1. Circuit ID 2.A-Location 3. Z-Location 4. A-Side Next Step 5. A-Side Assigned Eng 6. A-Side Router 7. A-Side Interface 8. A-Side IP Address 9. Location 10. FPC (HW ID #1) 11. PIC (HW ID #2) 12. Optics (HW ID #3) 13. TAM 14 .TOM 15. Bypass A Port 16. Install ECM 17. Install Date 18. testing IP Address 19. Traffic Add ECM 20. Traffic Add Date: 21. Shipment #1 Tracking Number 22. Shipment #2 Tracking Number 23. Shipment #3 Tracking Number 24. Facility Inbound Shipment Ticket HTML Source Below expandcollapse popup<tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <big><b>Next Step (Overall Status)</b>: Assessment</big> </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>Target Completion Date</b>: </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>Project Overview</b>: </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>Project Notes</b>:{{{ProjectNotes}}} </td></tr> <tr> <td align="center" bgcolor="#f4a460" colspan="2"> <big><b>Technical Information</b></big> </td></tr> <tr> <td align="left" bgcolor="#F5FAFF"> <b>Priority</b>: 88% </td><td align="left" bgcolor="#F5FAFF"> <b>Requires New Fate Sharing:</b> </td></tr> <tr> <td align="left" bgcolor="#F5FAFF"> <b>Project Open Date</b>: 2013-Q2 </td><td align="left" bgcolor="#F5FAFF"> <b>Opened in Response to Failure</b>: N/A </td></tr> <tr> <td align="left" bgcolor="#F5FAFF"> <b>Type of Project</b>: </td><td align="left" bgcolor="#F5FAFF"> <b>Link To Cariden Plan</b>: {{{LinkToCaridenPlan}}} </td></tr> <tr> <td align="left" bgcolor="#F5FAFF"> <b>Circuit ID</b>: 13013.GE10.KSCYMOAVJAW.OKCYOKEZJBW </td><td> </td></tr> <tr> <th align="center" bgcolor="#99ccff" width="50%"> <big><b>A-Location</b>: KSCYBBRJ01</big> </th><th align="center" bgcolor="#fffccf" width="50%"> <big><b>Z-Location</b>: MTC3BBRJ02</big> </th></tr> <tr> <th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Backbone</b></small> </th><th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Backbone</b></small> </th></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>A-Side Next Step</b>: </td><td align="left" bgcolor="#fffccf"> <b>Z-Side Next Step</b>: Assessment </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>A-Side Assigned Eng</b>: TCovert </td><td align="left" bgcolor="#fffccf"> <b>Z-Side Assigned Eng</b>: Roger </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Router</b>: KSCYBBRJ01 </td><td align="left" bgcolor="#fffccf"> <b>Router</b>: MTC3BBRJ02 </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Interface</b>: xe-3/0/8 </td><td align="left" bgcolor="#fffccf"> <b>Interface</b>: xe-3/1/4 </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>OSPF Metric</b>: </td><td align="left" bgcolor="#fffccf"> <b>OSPF Metric</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>IP Address</b>: 68.1.1.192 </td><td align="left" bgcolor="#fffccf"> <b>IP Address</b>: 68.1.1.193 </td></tr> <tr> <th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Transport</b></small> </th><th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Transport</b></small> </th></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Location</b>: KSCY-15-A-1-1-5 </td><td align="left" bgcolor="#fffccf"> <b>Location</b>: OKC-15-A-5-2-1 </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Budget/Project Code</b>: </td><td align="left" bgcolor="#fffccf"> <b>Budget/Project Code</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Transport Notes</b>: </td><td align="left" bgcolor="#fffccf"> <b>Transport Notes</b>: </td></tr> <tr> <td align="center" bgcolor="#f4a460" colspan="2"><big><b>Hardware Requirements</b></big> </td></tr> <tr> <th align="center" bgcolor="#99ccff" width="50%"> <big><b>A-Location</b>: KSCYBBRJ01</big> </th><th align="center" bgcolor="#fffccf" width="50%"> <big><b>Z-Location</b>: MTC3BBRJ02</big> </th></tr> <tr> <th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Backbone</b></small> </th><th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Backbone</b></small> </th></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>POC</b>: </td><td align="left" bgcolor="#fffccf"> <b>POC</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Chassis Type</b>: T1600 </td><td align="left" bgcolor="#fffccf"> <b>Chassis Type</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>FPC (HW ID #1)</b>: </td><td align="left" bgcolor="#fffccf"> <b>FPC (HW ID #1)</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>FPC Serial Number</b>: </td><td align="left" bgcolor="#fffccf"> <b>FPC Serial Number</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>PIC (HW ID #2)</b>: </td><td align="left" bgcolor="#fffccf"> <b>PIC (HW ID #2)</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>PIC Serial Number</b>: </td><td align="left" bgcolor="#fffccf"> <b>PIC Serial Number</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Optics (HW ID #3)</b>: </td><td align="left" bgcolor="#fffccf"> <b>Optics (HW ID #3)</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Optics Serial Number</b>: </td><td align="left" bgcolor="#fffccf"> <b>Optics Serial Number</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Connector</b>: </td><td align="left" bgcolor="#fffccf"> <b>Connector</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Fiber Jumper (HW ID #4)</b>: </td><td align="left" bgcolor="#fffccf"> <b>Fiber Jumper (HW ID #4)</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Additional Hardware</b>: </td><td align="left" bgcolor="#fffccf"> <b>Additional Hardware</b>: </td></tr> <tr> <th align="center" bgcolor="#e7eef6" width="50%"> <small><b>Transport</b></small> </th><th align="center" width="50%"> <small><b>Transport</b></small> </th></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>TAM</b>:NONE </td><td align="left" bgcolor="#fffccf"> <b>TAM</b>:TIM </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>TOM</b>:NONE </td><td align="left" bgcolor="#fffccf"> <b>TOM</b>:SFP </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Transport Serial Numbers</b>: </td><td align="left" bgcolor="#fffccf"> <b>Transport Serial Numbers</b>: </td></tr> <tr> <td align="center" bgcolor="#f4a460" colspan="2"><big><b>Network Intelligence</b></big> </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>Bypass Name</b>: </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>Bypass IP</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Bypass A Port</b>: </td><td align="left" bgcolor="#fffccf"> <b>Bypass Z Port</b>: </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>DPI Name</b>: </td></tr> <tr> <td align="center" bgcolor="#e7eef6" colspan="2"> <b>DPI IP</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>DPI A Port</b>: </td><td align="left" bgcolor="#fffccf"> <b>DPI Z Port</b>: </td></tr> <tr> <td align="center" bgcolor="#f4a460" colspan="2"> <big><b>Maintenance Information</b></big> </td></tr> <tr> <th align="center" bgcolor="#99ccff" width="50%"> <big><b>A-Location</b>: KSCYBBRJ01</big> </th><th align="center" bgcolor="#fffccf" width="50%"> <big><b>Z-Location</b>: MTC3BBRJ02</big> </th></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Install ECM</b>: </td><td align="left" bgcolor="#fffccf"> <b>Install ECM</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Install Date</b>: </td><td align="left" bgcolor="#fffccf"> <b>Install Date</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Testing IP Address</b>:INSERT_TEST_IP_HERE </td><td align="left" bgcolor="#fffccf"> <b>Testing IP Address</b>:INSERT_TEST_IP_HERE </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Traffic Add ECM</b>: </td><td align="left" bgcolor="#fffccf"> <b>Traffic Add ECM</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Traffic Add Date</b>: </td><td align="left" bgcolor="#fffccf"> <b>Traffic Add Date</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Peering Maintenance Ticket</b>: </td><td align="left" bgcolor="#fffccf"> <b>Peering Maintenance Ticket</b>: </td></tr> <tr> <td align="center" bgcolor="#f4a460" colspan="2"> <big><b>Shipping Information</b></big> </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Shipment #1 Tracking Number</b>: </td><td align="left" bgcolor="#fffccf"> <b>Shipment #1 Tracking Number</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Shipment #2 Tracking Number</b>: </td><td align="left" bgcolor="#fffccf"> <b>Shipment #2 Tracking Number</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Shipment #3 Tracking Number</b>: </td><td align="left" bgcolor="#fffccf"> <b>Shipment #3 Tracking Number</b>: </td></tr> <tr> <td align="left" bgcolor="#99ccff"> <b>Facility Inbound Shipment Ticket</b>: </td><td align="left" bgcolor="#fffccf"> <b>Facility Inbound Shipment Ticket</b>: </td></tr></table> </div> <div style="clear:both;"></div></div> Auto-It Code For Parsing Here here: #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 507, 338, 575, 483) $CoxLabel = GUICtrlCreateLabel("Email Notification ", 176, 8, 262, 41) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $C4CoreProjectTypeRadio = GUICtrlCreateRadio("C4 Core Link", 30, 118, 105, 17) $RdcProjectTypeRadio = GUICtrlCreateRadio("RDC Interconnect", 30, 94, 105, 17) $TypeofProjectLabel = GUICtrlCreateLabel("Please Choose The Type Of Project This Is", 22, 70, 249, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $SystemProjectTypeRadio = GUICtrlCreateRadio("System Connection", 30, 142, 113, 17) $ProjectNameLabel = GUICtrlCreateLabel("Please Input Your Project Name", 22, 174, 185, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ProjectNameInputBox = GUICtrlCreateInput("", 30, 206, 193, 21) $NumberOfProjectsLabel = GUICtrlCreateLabel("Please Input The Number Of Projects You Have Of This Kind", 14, 238, 349, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $NumberOfProjectsInput = GUICtrlCreateInput("", 38, 262, 193, 21) $SubmitButton = GUICtrlCreateButton("Submit", 398, 286, 89, 33) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd The idea being that a tech would enter a project name IE: CHGO-KSCY-01A-Q2-2013, and the number of projects IE4 and select the type of project and hit submit. When that happens it would take the value of project name and add it to the end of a URL and grab all the data above and depending on which type of project that would be given a different email to be sent out. I have all that code written already. Just need to grab all the data rather than manually enter it. Auto-It Code for Updater Here: expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 504, 550, 856, 161) $CoxLabel = GUICtrlCreateLabel("Wiki Updater", 176, 8, 188, 41) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $TypeofProjectLabel = GUICtrlCreateLabel("", 22, 70, 4, 4) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $NumberOfProjectsLabel = GUICtrlCreateLabel("Please Input The Number Of Projects You Have Of This Kind", 14, 206, 349, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $NumberOfProjectsInput = GUICtrlCreateInput("", 38, 230, 145, 21) $SubmitButton = GUICtrlCreateButton("Submit", 398, 286, 89, 33) $Label1 = GUICtrlCreateLabel("Which Side Of The Project Do You Have?", 24, 152, 243, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Aside = GUICtrlCreateRadio("A Side", 24, 176, 49, 17) $Zside = GUICtrlCreateRadio("Z Side", 104, 176, 49, 17) $ProjectNameInputBox = GUICtrlCreateInput("", 42, 112, 145, 21) $ProjectNameLabel = GUICtrlCreateLabel("Please Input Your Project Name", 26, 80, 185, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("Input Information To Update", 31, 266, 164, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlCreateInput("Project Engineer", 40, 296, 145, 21) GUICtrlCreateInput("Project Status", 42, 327, 145, 21) GUICtrlCreateInput("Install ECM", 44, 355, 145, 21) GUICtrlCreateInput("Install Date", 43, 386, 145, 21) GUICtrlCreateInput("Traffic Add ECM", 40, 418, 145, 21) GUICtrlSetTip(-1, "Project Engineer") GUICtrlCreateInput("Traffic Add Date", 40, 450, 145, 21) GUICtrlCreateInput("Shipping #1", 42, 481, 145, 21) GUICtrlCreateInput("Shipping #2", 40, 512, 145, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Edited May 15, 2013 by atnextc Link to comment Share on other sites More sharing options...
PhoenixXL Posted May 15, 2013 Share Posted May 15, 2013 (edited) I'm assuming that the file having the all the HTML you posted is in File.txt in the script dir Thereafter have a look expandcollapse popup#include <Array.au3> $HTML = FileRead("file.txt") ;Strip all tags $HTML = StringRegExpReplace($HTML, "<[^<>]+>", "") MsgBox(0, "Test", "Stripped " & @extended & " tags.") ;Strip blank lines and not required spaces $HTML = StringRegExpReplace($HTML, "(?m)(^\s+)", "") ConsoleWrite($HTML & @CRLF) Local Const $aRequiredTags[25] = [ _ "Circuit ID", _ "A-Location", _ "Z-Location", _ "A-Side Next Step", _ "A-Side Assigned Eng", _ "A-Side Router", _ "A-Side Interface", _ "A-Side IP Address", _ "Location", _ "FPC (HW ID #1)", _ "PIC (HW ID #2)", _ "Optics (HW ID #3)", _ "TAM", _ "TOM", _ "Bypass A Port", _ "Install ECM", _ "Install Date", _ "testing IP Address", _ "Traffic Add ECM", _ "Traffic Add Date:", _ "Shipment #1 Tracking Number", _ "Shipment #2 Tracking Number", _ "Shipment #3 Tracking Number", _ "Facility Inbound Shipment Ticket"] ;The Pattern assumes that every <td> tag is opened in a new line. For $i = 0 To 24 $aTemp = StringRegExp($HTML, "(?i)\Q" & $aRequiredTags[$i] & ":\E(.*)", 3) _ArrayDisplay($aTemp, $aRequiredTags[$i]) Next Ask if you encounter any problems Thumbs up if it helped Regards Edited May 15, 2013 by PhoenixXL My code: PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners. MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression. Link to comment Share on other sites More sharing options...
atnextc Posted May 15, 2013 Author Share Posted May 15, 2013 (edited) I tried the code that you have posted above, it pulled the data needed, but it also pulled multiple other items that are in the html page as well. It also show'd everything in a different "popup" window rather than 1 window with just the data requested above. I'm trying to grab just the information from the "variables" above and have the data after say "circuit id" be a variable to be used further on in the code to be put into an email. I'm trying to automate the code below basically: expandcollapse popup;Everything is working fine. ;RDC Maintenance Email Notification Form ;5/15/13 #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GUIComboBox.au3> #include <WinAPI.au3> #include <Array.au3> $RdcProjectTypeFrm = GUICreate("Maintenance Email Notification",1215, 674, 185, 119) $CoxLabel = GUICtrlCreateLabel("Maintenance Email Notification ", 248, 8, 780, 41) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $ProjectSiteLabel = GUICtrlCreateLabel("Choose Your Project Site Location", 24, 256, 241, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ProjectNameLabel = GUICtrlCreateLabel("Input Your Project Name", 24, 192, 200, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $TypeofProjectLabel = GUICtrlCreateLabel("Choose The Type Of Project This Is", 24, 72, 249, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $NumberOfProjectsLabel = GUICtrlCreateLabel("Input The Number Of Projects You Have Of This Kind", 24, 320, 349, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_HIDE) GUIStartGroup() $RdcProjectTypeRadio = GUICtrlCreateRadio("RDC Interconnect", 40, 104, 105, 17) $C4CoreProjectTypeRadio = GUICtrlCreateRadio("C4 Core Link", 40, 128, 105, 17) $SystemProjectTypeRadio = GUICtrlCreateRadio("System Connection", 40, 152, 113, 17) GUIStartGroup() $ProjectNameInputBox = GUICtrlCreateInput("", 48, 216, 193, 21,$ES_UPPERCASE) Global $ProjectSiteCombo = GUICtrlCreateCombo("", 48, 280, 193, 25,BitOR($CBS_DROPDOWNLIST, $CBS_SORT)) Global $RDCNumberOfProjectsInput = GUICtrlCreateInput("", 48, 344, 193, 21) $RDCNumberOfProjectsRead = GUICtrlRead ($RDCNumberOfProjectsInput) Global $ProjectNameRead = GUICtrlRead ($ProjectNameInputBox) Global $RDCProjectSiteRead = GUICtrlRead ($ProjectSiteCombo) GUICtrlSetState(-1, $GUI_HIDE) Global $I = 0 Local $RDCRouterNameCombo Local $RDCInterfaceTypeCombo Local $RDCRouterInterfacePortInput Local $RDCOtherRouterNameCombo Local $RDCOtherRouterInterfaceTypeCombo Local $RDCOtherRouterInterfacePortInput Local $RDCYesInstallFPCRadio Local $RDCNoInstallFPCRadio Local $RDCFPCInstallLocationInput Local $RDCYesInstallPicRadio Local $RDCNoInstallPICRadio Local $RDCPicInstallLocationInput Local $RDCYesInstallOpticRadio Local $RDCNoInstallOpticRadio Local $RDCOpticInstallLocationInput Local $RDCNextProjectButton Local $RDCClearButton Local $RDCSubmitButton Local $RDCRouterSideLabel Local $RDCInterfaceTypeLabel Local $RDCRouterInterfacePortLabel Local $RDCRouterNameOtherSideLabel Local $RDCOtherRouterInterfacePortLabel Local $RDCOtherRouterInterfaceTypeLabel Local $RDCInstallHardwareLabel Local $RDCFPCInstallLabel Local $RDCInstallPICLabel Local $RDCPICInstallLabel Local $RDCInstallOpticLabel Local $RDCInputOpticLocationLabel Local $RDCASideFPCInstallInput Local $RDCZSideFPCInstallInput Local $RDCBothRouterFPCInstall Local $RDCASideFPCInstall Local $RDCZSideFPCInstall Local $RDCFPCSideALabel Local $RDCASideFPCInstallInput Local $RDCZSideFPCInstallInput Local $RDCSideZFPCInstallLabel Local $RDCASidePicInstall Local $RDCZSidePicInstall Local $RDCChooseRouterPicInstallLabel Local $RDCBothRouterPicInstall Local $RDCInstallPICSIdeALabel Local $RDCASidePicInput Local $RDCInstallPICSIdeZLabel Local $RDCZSidePicInput Local $RDCOpticsInstallLabel Local $RDCASideOpticsInstall Local $RDCZSideOpticsInstall Local $RDCBothRoutersOpticsInstall Local $RDCInstallOpticsSIdeALabel Local $RDCASideOpticsInstallInput Local $RDCInstallOpticsSideZLabel Local $RDCZSideOpticsInstallInput Local $ASideFPCInstallInput Local $ZSideFPCInstallInput Local $SystemoProjectTypeFrm Global $EmailEdit, $EmailForm, $CopyButton GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $RdcProjectTypeRadio GUICtrlSetState($RDCNumberOfProjectsInput, $GUI_SHOW) GUICtrlSetState($NumberOfProjectsLabel, $GUI_SHOW) $RDCRouterNameCombo = GUICtrlCreateCombo("", 48, 408, 193, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) $RDCInterfaceTypeCombo = GUICtrlCreateCombo("", 48, 472, 57,25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) $RDCRouterInterfacePortInput = GUICtrlCreateInput("", 120, 472, 89, 21) $RDCOtherRouterNameCombo = GUICtrlCreateCombo("", 48, 536, 193, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) $RDCOtherRouterInterfaceTypeCombo = GUICtrlCreateCombo("", 40, 600, 57, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) $RDCOtherRouterInterfacePortInput = GUICtrlCreateInput("", 120, 600, 89, 21) GUICtrlSetData($RDCInterfaceTypeCombo, "et|ge|xe", "Choose Interface Type") GUICtrlSetData($RDCOtherRouterInterfaceTypeCombo, "et|ge|xe", "Choose Interface Type") GUIStartGroup() $RDCYesInstallFPCRadio = GUICtrlCreateRadio("Yes", 512, 104, 41, 17) $RDCNoInstallFPCRadio = GUICtrlCreateRadio("No", 576, 104, 41, 17) GUICtrlSetState($RDCNoInstallFPCRadio,$GUI_CHECKED) GUIStartGroup() $RDCFPCInstallLabel = GUICtrlCreateLabel("Choose Where You Need An FPC Installed", 480, 144, 245, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUIStartGroup() $RDCASideFPCInstall = GUICtrlCreateRadio("A Side", 504, 176, 57, 17) GUICtrlSetState(-1, $GUI_HIDE) $RDCBothRouterFPCInstall = GUICtrlCreateRadio("Both Routers", 640, 176, 81, 17) GUICtrlSetState(-1, $GUI_HIDE) $RDCZSideFPCInstall = GUICtrlCreateRadio("Z Side", 576, 176, 57, 17) GUICtrlSetState(-1, $GUI_HIDE) GUIStartGroup() $RDCASideFPCInstallInput = GUICtrlCreateInput("", 496, 248, 193, 21) GUICtrlSetState(-1, $GUI_HIDE) $RDCZSideFPCInstallInput = GUICtrlCreateInput("", 496, 320, 193, 21) GUICtrlSetState(-1, $GUI_HIDE) GUIStartGroup() $RDCYesInstallPicRadio = GUICtrlCreateRadio("Yes", 512, 376, 41, 17) $RDCNoInstallPICRadio = GUICtrlCreateRadio("No", 576, 376, 41, 17) GUICtrlSetState($RDCNoInstallPICRadio,$GUI_CHECKED) GUIStartGroup() $RDCFPCSideALabel = GUICtrlCreateLabel("Input Which Slot You Need The FPC Installed (A Side)", 456, 216, 313, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUIStartGroup() $RDCYesInstallOpticRadio = GUICtrlCreateRadio("Yes", 912, 104, 41, 17) $RDCNoInstallOpticRadio = GUICtrlCreateRadio("No", 976, 104, 41, 17) GUICtrlSetState($RDCNoInstallopticRadio,$GUI_CHECKED) GUIStartGroup() $RDCNextProjectButton = GUICtrlCreateButton("Next Project", 984, 352, 99, 33) GUICtrlSetState(-1, $GUI_HIDE) $RDCClearButton = GUICtrlCreateButton("Clear", 928, 392, 89, 33) $RDCSubmitButton = GUICtrlCreateButton("Submit", 1040, 392, 89, 33) GUICtrlSetState(-1, $GUI_HIDE) $RDCRouterSideLabel = GUICtrlCreateLabel(" Choose The Router For A-Side", 24, 384, 223, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCRouterInterfacePortLabel = GUICtrlCreateLabel("Choose Interface Type and Input Port Number For A-Side", 24, 448, 328, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCRouterNameOtherSideLabel = GUICtrlCreateLabel("Choose The Router For Z-Side Router", 24, 512, 261, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCOtherRouterInterfacePortLabel = GUICtrlCreateLabel("Choose Interface Type and Input Port Number For Z-Side", 24, 568, 328, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCInstallHardwareLabel = GUICtrlCreateLabel("Choose If You Need To Install An FPC", 480, 72, 221, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCInstallPICLabel = GUICtrlCreateLabel("Choose If You Need To Install A PIC", 480, 352, 211, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCInstallOpticLabel = GUICtrlCreateLabel("Choose If You Need To Install An Optic", 880, 72, 228, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCSideZFPCInstallLabel = GUICtrlCreateLabel("Input Which Slot You Need The FPC Installed (Z Side)", 456, 288, 313, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCChooseRouterPicInstallLabel = GUICtrlCreateLabel("Choose Where You Need A PIC Installed", 480, 408, 235, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUIStartGroup() $RDCASidePicInstall = GUICtrlCreateRadio("A Side", 496, 432, 57, 17) GUICtrlSetState(-1, $GUI_HIDE) $RDCZSidePicInstall = GUICtrlCreateRadio("Z Side", 568, 432, 57, 17) GUICtrlSetState(-1, $GUI_HIDE) $RDCBothRouterPicInstall = GUICtrlCreateRadio("Both Routers", 632, 432, 81, 17) GUICtrlSetState(-1, $GUI_HIDE) GUIStartGroup() $RDCInstallPICSIdeALabel = GUICtrlCreateLabel("Input Which Slot You Need The PIC Installed (A Side)", 456, 464, 310, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCASidePicInput = GUICtrlCreateInput("", 496, 496, 193, 21) GUICtrlSetState(-1, $GUI_HIDE) $RDCInstallPICSIdeZLabel = GUICtrlCreateLabel("Input Which Slot You Need The PIC Installed (Z Side)", 456, 528, 310, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCZSidePicInput = GUICtrlCreateInput("", 496, 552, 193, 21) GUICtrlSetState(-1, $GUI_HIDE) $RDCOpticsInstallLabel = GUICtrlCreateLabel("Choose Where You Need Optics Installed", 880, 144, 239, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUIStartGroup() $RDCZSideOpticsInstall = GUICtrlCreateRadio("Z Side", 976, 176, 57, 17) GUICtrlSetState(-1, $GUI_HIDE) $RDCASideOpticsInstall = GUICtrlCreateRadio("A Side", 904, 176, 57, 17) GUICtrlSetState(-1, $GUI_HIDE) $RDCBothRoutersOpticsInstall = GUICtrlCreateRadio("Both Routers", 1040, 176, 81, 17) GUICtrlSetState(-1, $GUI_HIDE) GUIStartGroup() $RDCInstallOpticsSIdeALabel = GUICtrlCreateLabel("Input Which Port You Need The Optics Installed (A Side)", 864, 216, 327, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCASideOpticsInstallInput = GUICtrlCreateInput("", 912, 248, 193, 21) GUICtrlSetState(-1, $GUI_HIDE) $RDCInstallOpticsSideZLabel = GUICtrlCreateLabel("Input Which Port You Need The Optics Installed (Z Side)", 864, 288, 327, 17) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCZSideOpticsInstallInput = GUICtrlCreateInput("", 911, 313, 193, 21) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetData($ProjectSiteCombo, "Duke|Baton Rouge|Hampton Roads|Kansas|Las Vegas (Northwest)|New Orleans|NOVA|OKC|Omaha|Orange County|Phoenix (Chandler)|Rhode Island|San Diego (Federal)|El Cajon (San Diego)|McDowell (Phoenix)|Las Vegas (Southeast)|Virginia Beach (Hampton Roads)|Cleveland|Gainesville|Macon|Pensacola|Roanoke|Tulsa|Deer Valley|Ashburn|Los Angeles|Marietta|New York|Palo Alto", "Choose A Site") ; add other item snd set a new default GUICtrlSetData($RDCRouterNameCombo, "ASHBBBRJ01|ASHBBBRJ02|ASHBBPRJ01|ASHBBPRJ02|BTNRBBRJ01|BTNRBBRJ02|BTNRDSRJ01|BTNRDSRJ02|CHGOBPRJ01|CHGOBPRJ02|CHNDBBRJ01|CHNDDSRJ01|CLVDHDRJ01|CLVDHDRJ02|DALSBBRJ01|DALSBBRJ02|DALSBPRJ01|DALSBPRJ02|DUKEBBRJ01|DUKEBBRJ02|DUKEDSRJ01|DUKEDSRJ02|DVTCHDRJ01|DVTCHDRJ02|ELCNBBRJ01|ELCNDSRJ01|ELMWBBRJ01|ELMWBBRJ02|ELMWDSRJ01|ELMWDSRJ02|FED1BBRJ01|FED1DSRJ01|GAINHDRJ01|GAINHDRJ02|KSCYBBRJ01|KSCYBBRJ02|KSCYDSRJ01|KSCYDSRJ02|LANGBBRJ01|LANGBBRJ02|LANGBPRJ01|LANGBPRJ02|MACNHDRJ01|MACNHDRJ02|MARIBPRJ01|MCDLBBRJ01|MCDLDSRJ01|MRFDBBRJ01|MRFDBBRJ02|MRFDDSRJ01|MRFDDSRJ02|MTC1BBRJ01|MTC1BBRJ02|MTC1DSRJ01|MTC1DSRJ02|MTC3BBRJ01|MTC3BBRJ02|MTC3DSRJ01|MTC3DSRJ02|NRFKBBRJ01|NRFKDSRJ01|NYRKBBRJ01|NYRKBBRJ02|NYRKBPRJ01|NYRKBPRJ02|NWSTBBRJ01|NWSTDSRJ01|PALTBPRJ01|PALTBPRJ02|PNSCHDRJ01|PNSCHDRJ02|PROVBBRJ01|PROVBBRJ02|PROVDSRJ01|PROVDSRJ02|RSMTBBRJ01|RSMTBBRJ02|RSMTDSRJ01|RSMTDSRJ02|RNKEHDRJ01|RNKEHDRJ02|SANJBBRJ01|SANJBBRJ02|SESTBBRJ01|SESTDSRJ01|SNTBHDRJ01|SNTBHDRJ02|TULSHDRJ01|TULSHDRJ02|VBCHBBRJ01|VBCHDSRJ01", "") GUICtrlSetData($RDCOtherRouterNameCombo, "ASHBBBRJ01|ASHBBBRJ02|ASHBBPRJ01|ASHBBPRJ02|BTNRBBRJ01|BTNRBBRJ02|BTNRDSRJ01|BTNRDSRJ02|CHGOBPRJ01|CHGOBPRJ02|CHNDBBRJ01|CHNDDSRJ01|CLVDHDRJ01|CLVDHDRJ02|DALSBBRJ01|DALSBBRJ02|DALSBPRJ01|DALSBPRJ02|DUKEBBRJ01|DUKEBBRJ02|DUKEDSRJ01|DUKEDSRJ02|DVTCHDRJ01|DVTCHDRJ02|ELCNBBRJ01|ELCNDSRJ01|ELMWBBRJ01|ELMWBBRJ02|ELMWDSRJ01|ELMWDSRJ02|FED1BBRJ01|FED1DSRJ01|GAINHDRJ01|GAINHDRJ02|KSCYBBRJ01|KSCYBBRJ02|KSCYDSRJ01|KSCYDSRJ02|LANGBBRJ01|LANGBBRJ02|LANGBPRJ01|LANGBPRJ02|MACNHDRJ01|MACNHDRJ02|MARIBPRJ01|MCDLBBRJ01|MCDLDSRJ01|MRFDBBRJ01|MRFDBBRJ02|MRFDDSRJ01|MRFDDSRJ02|MTC1BBRJ01|MTC1BBRJ02|MTC1DSRJ01|MTC1DSRJ02|MTC3BBRJ01|MTC3BBRJ02|MTC3DSRJ01|MTC3DSRJ02|NRFKBBRJ01|NRFKDSRJ01|NYRKBBRJ01|NYRKBBRJ02|NYRKBPRJ01|NYRKBPRJ02|NWSTBBRJ01|NWSTDSRJ01|PALTBPRJ01|PALTBPRJ02|PNSCHDRJ01|PNSCHDRJ02|PROVBBRJ01|PROVBBRJ02|PROVDSRJ01|PROVDSRJ02|RSMTBBRJ01|RSMTBBRJ02|RSMTDSRJ01|RSMTDSRJ02|RNKEHDRJ01|RNKEHDRJ02|SANJBBRJ01|SANJBBRJ02|SESTBBRJ01|SESTDSRJ01|SNTBHDRJ01|SNTBHDRJ02|TULSHDRJ01|TULSHDRJ02|VBCHBBRJ01|VBCHDSRJ01", "") Case $RDCNumberOfProjectsInput If guictrlread ($RDCNumberOfProjectsInput) > 1 Then;;;;;;;;;;;;;;;;;;;; IF THE NUMBER OF PROJECTS IS MORE THAN 1 THEN WE ARE CHANGING THE VALUE OF THE SUBMIT BUTTON TO "NEXT PROJECT" GUICtrlSetData ($RDCSubmitButton, "Next Project") GUICtrlSetState($RDCSubmitButton, $GUI_SHOW) GUICtrlSetState($RDCClearButton, $GUI_SHOW) EndIf If guictrlread ($RDCNumberOfProjectsInput) = 1 Then;;;;;;;;;;;;;;;;;;;; IF THE NUMBER OF PROJECTS IS 1 THEN WE ARE CHANGING THE VALUE OF THE SUBMIT BUTTON TO "DONE" GUICtrlSetData ($RDCSubmitButton, "Done") GUICtrlSetState($RDCSubmitButton, $GUI_SHOW) GUICtrlSetState($RDCClearButton, $GUI_SHOW) EndIf Case $ProjectSiteCombo If GUICtrlRead($ProjectSiteCombo) = "Duke" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "DUKEBBRJ01|DUKEBBRJ02|DUKEDSRJ01|DUKEDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "DUKEBBRJ01|DUKEBBRJ02|DUKEDSRJ01|DUKEDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Baton Rouge" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "BTNRBBRJ01|BTNRBBRJ02|BTNRDSRJ01|BTNRDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "BTNRBBRJ01|BTNRBBRJ02|BTNRDSRJ01|BTNRDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Kansas" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "KSCYBBRJ01|KSCYBBRJ02|KSCYDSRJ01|KSCYDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "KSCYBBRJ01|KSCYBBRJ02|KSCYDSRJ01|KSCYDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Las Vegas (Northwest)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "NWSTBBRJ01|NWSTDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "NWSTBBRJ01|NWSTDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "New Orleans" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "ELMWBBRJ01|ELMWBBRJ02|ELMWDSRJ01|ELMWDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "ELMWBBRJ01|ELMWBBRJ02|ELMWDSRJ01|ELMWDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "NOVA" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "MRFDBBRJ01|MRFDBBRJ02|MRFDDSRJ01|MRFDDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "MRFDBBRJ01|MRFDBBRJ02|MRFDDSRJ01|MRFDDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "OKC" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "MTC3BBRJ01|MTC3BBRJ02|MTC3DSRJ01|MTC3DSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "MTC3BBRJ01|MTC3BBRJ02|MTC3DSRJ01|MTC3DSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Omaha" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "MTC1BBRJ01|MTC1BBRJ02|MTC1DSRJ01|MTC1DSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "MTC1BBRJ01|MTC1BBRJ02|MTC1DSRJ01|MTC1DSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Orange County" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "RSMTBBRJ01|RSMTBBRJ02|RSMTDSRJ01|RSMTDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "RSMTBBRJ01|RSMTBBRJ02|RSMTDSRJ01|RSMTDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Phoenix (Chandler)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "CHNDBBRJ01|CHNDDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "CHNDBBRJ01|CHNDDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Rhode Island" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "PROVBBRJ01|PROVBBRJ02|PROVDSRJ01|PROVDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "PROVBBRJ01|PROVBBRJ02|PROVDSRJ01|PROVDSRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "San Diego (Federal)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "FED1BBRJ01|FED1DSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "FED1BBRJ01|FED1DSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "El Cajon (San Diego)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "ELCNBBRJ01|ELCNDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "ELCNBBRJ01|ELCNDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "McDowell (Phoenix)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "MCDLBBRJ01|MCLDDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "MCDLBBRJ01|MCLDDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Las Vegas (Southeast)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "SESTBBRJ01|SESTDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "SESTBBRJ01|SESTDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Virginia Beach (Hampton Roads)" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "VBCHBBRJ01|VBCHDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "VBCHBBRJ01|VBCHDSRJ01", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Cleveland" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "CLVDHDRJ01|CLVDHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "CLVDHDRJ01|CLVDHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Gainesville" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "GAINHDRJ01|GAINHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "GAINHDRJ01|GAINHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Macon" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "MACNHDRJ01|MACNHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "MACNHDRJ01|MACNHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Pensacola" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "PNSCHDRJ01|PNSCHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "PNSCHDRJ01|PNSCHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Roanoke" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "RNKEHDRJ01|RNKEHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "RNKEHDRJ01|RNKEHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Tulsa" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "TULSHDRJ01|TULSHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "TULSHDRJ01|TULSHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Deer Valley" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "DVTCHDRJ01|DVTCHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "DVTCHDRJ01|DVTCHDRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Ashburn" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "ASHBBBRJ01|ASHBBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "ASHBBBRJ01|ASHBBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Dallas" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "DALSBBRJ01|DALSBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "DALSBBRJ01|DALSBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Los Angeles" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "LANGBBRJ01|LANGBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "LANGBBRJ01|LANGBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "New York" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "NYRKBBRJ01|NYRKBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "NYRKBBRJ01|NYRKBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) ElseIf GUICtrlRead($ProjectSiteCombo) = "Palo Alto" Then _GUICtrlComboBox_ResetContent($RDCRouterNameCombo) GUICtrlSetData($RDCRouterNameCombo, "SANJBBRJ01|SANJBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCRouterNameCombo, 0) _GUICtrlComboBox_ResetContent($RDCOtherRouterNameCombo) GUICtrlSetData($RDCOtherRouterNameCombo, "SANJBBRJ01|SANJBBRJ02", "") _GUICtrlComboBox_SetCurSel($RDCOtherRouterNameCombo, 0) EndIf Case $RDCNoInstallFPCRadio GUICtrlSetState($RDCASideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetData($RDCASideFPCInstallInput, "") guictrlsetdata($RDCZSideFPCInstallInput, "") Case $RDCYesInstallFPCRadio GUICtrlSetState($RDCASideFPCInstall, $GUI_SHOW) GUICtrlSetState($RDCZSideFPCInstall, $GUI_SHOW) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_SHOW) GUICtrlSetState($RDCFPCInstallLabel, $GUI_SHOW) Case $RDCASideFPCInstall GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_SHOW) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_SHOW) Case $RDCZSideFPCInstall GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_SHOW) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_SHOW) Case $RDCBothRouterFPCInstall GUICtrlSetState($RDCFPCSideALabel, $GUI_SHOW) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_SHOW) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_SHOW) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_SHOW) Case $RDCNoInstallOpticRadio GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) guictrlsetdata($RDCZSideOpticsInstallInput, "") guictrlsetdata($RDCASideOpticsInstallInput, "") Case $RDCYesInstallOpticRadio GUICtrlSetState($RDCOpticsInstallLabel, $GUI_SHOW) GUICtrlSetState($RDCASideOpticsInstall, $GUI_SHOW) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_SHOW) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_SHOW) Case $RDCASideOpticsInstall GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_SHOW) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_SHOW) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) Case $RDCZSideOpticsInstall GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_SHOW) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_SHOW) Case $RDCBothRoutersOpticsInstall GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_SHOW) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_SHOW) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_SHOW) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_SHOW) Case $RDCNoInstallPICRadio GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) guictrlsetdata($RDCASidePicInput, "") guictrlsetdata($RDCZSidePicInput, "") Case $RDCYesInstallPICRadio GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_SHOW) GUICtrlSetState($RDCASidePicInstall, $GUI_SHOW) GUICtrlSetState($RDCZSidePicInstall, $GUI_SHOW) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_SHOW) Case $RDCASidePicInstall GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_SHOW) GUICtrlSetState($RDCASidePicInput, $GUI_SHOW) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) Case $RDCZSidePicInstall GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_SHOW) GUICtrlSetState($RDCZSidePicInput, $GUI_SHOW) Case $RDCBothRouterPicInstall GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_SHOW) GUICtrlSetState($RDCZSidePicInput, $GUI_SHOW) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_SHOW) GUICtrlSetState($RDCASidePicInput, $GUI_SHOW) Case $RDCSubmitButton $RDCProjectSiteRead = GUICtrlRead ($ProjectSiteCombo) $RDCInterfaceTypeRead = GUICtrlRead ($RDCInterfaceTypeCombo) $RDCInterfacePortRead = GUICtrlRead ($RDCRouterInterfacePortInput) $RDCOtherRouterRead = GUICtrlRead ($RDCOtherRouterNameCombo) $RDCRouterNameRead = GUICtrlRead ($RDCRouterNameCombo) $RDCOtherInterfaceTypeRead = GUICtrlRead ($RDCOtherRouterInterfaceTypeCombo) $RDCOtherInterfacePortRead = GUICtrlRead ($RDCOtherRouterInterfacePortInput) $ASideFPCInstallRead = GUICtrlRead ($ASideFPCInstallInput) $ZSideFPCInstallRead = GUICtrlRead ($ZSideFPCInstallInput) $ASidePICInstallRead = GUICtrlRead ($RDCASidePicInput) $ZSidePICInstallRead = GUICtrlRead ($RDCZSidePicInput) $ASideOpticInstallRead = GUICtrlRead ($RDCASideOpticsInstallInput) $ZSideOpticInstallRead = GUICtrlRead ($RDCZSideOpticsInstallInput) $RDCProjectNameRead = GUICtrlRead ($ProjectNameInputBox) $RDCASideFPCInstallRead = GUICtrlRead ($RDCASideFPCInstall) $RDCYesInstallFPCRadioRead = GUICtrlRead ($RDCYesInstallFPCRadio) $RDCZSideFPCInstallRead = GUICtrlRead ($RDCZSideFPCInstall) $RDCASideFPCInstallInputRead = GUICtrlRead ($RDCASideFPCInstallInput) $RDCZSideFPCInstallInputRead = GUICtrlRead ($RDCZSideFPCInstallInput) $RDCBothRouterFPCInstallRead = GUICtrlRead ($RDCBothRouterFPCInstall) $CapacityInput = ($RDCNumberOfProjectsRead * 10) $RDCNumberOfProjectsRead = GUICtrlRead ($RDCNumberOfProjectsInput) IF (guictrlread ($RDCNumberOfProjectsInput) = 1 AND ($I) = 0) Then;;;;THIS WILL CHECK TO SEE THE NUMBER OF PROJECTS IS MORE THAN 1 BUT THAT $1 IS ZERO SO THAT WE CAN GRAB THE FIRST PART OF THE EMAIL. ;MsgBox(0,"Variable Checker", "The number of $I is " & $I) guictrlsetstate($RDCRouterInterfacePortInput,$gui_focus) $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,GUICtrlRead ($ProjectSiteCombo)) FileWrite($rdcfile, ",") FileWrite($rdcfile,@CRLF & @CRLF) FileWrite($rdcfile,"We recently have launched the below C4 projects for your system. We need on site assistance to perform the maintenance. let us know who the Point of Contact for this activity will be so we can ship the hardware and plan the maintenance. " & @CRLF & @CRLF & @CRLF & @CRLF & "Details for Capacity Projects:") FileWrite($rdcfile,@CRLF & @CRLF& @CRLF) FileWrite($rdcfile,"Project:") FileWrite($rdcfile,$RDCProjectNameRead) FileWrite($rdcfile,@CRLF & @CRLF& @CRLF) FileWrite($rdcfile,"These projects are to add an additional ") FileWrite($rdcfile, GUICtrlRead ($RDCNumberOfProjectsInput) * 10) FileWrite($rdcfile, "GB of capacity between ") FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile, " and ") FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile, ".") FileWrite($rdcfile,@CRLF & @CRLF) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile, ": Connect fiber into ") FileWrite($rdcfile, $RDCInterfaceTypeRead) FileWrite($rdcfile, "-") FileWrite($rdcfile, $RDCInterfacePortRead) FileWrite($rdcfile, @CRLF) FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile, ": Connect fiber into ") FileWrite($rdcfile, $RDCOtherInterfaceTypeRead) FileWrite($rdcfile, "-") FileWrite($rdcfile, $RDCOtherInterfacePortRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) If not GUICtrlRead ($RDCASideFPCInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCRouterNameRead) FileWrite($rdcfile,": Install FPC into slot ") FileWrite($rdcfile,$RDCASideFPCInstallInputRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf If not GUICtrlRead ($RDCZSideFPCInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCOtherRouterRead) FileWrite($rdcfile,": Install FPC into slot ") FileWrite($rdcfile,$RDCZSideFPCInstallInputRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCASidePicInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile,": Install PIC into slot ") FileWrite($rdcfile,$ASidePICInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCZSidePicInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile,": Install PIC into slot ") FileWrite($rdcfile,$ZSidePICInstallRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCASideOpticsInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile,": Install optic into slot ") FileWrite($rdcfile,$ASideOpticInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCZSideOpticsInstallInput)= "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCOtherRouterRead) FileWrite($rdcfile,": Install optic into slot ") FileWrite($rdcfile,$ZSideOpticInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if guictrlread ($ZSidePICInstallRead) = 18 Then GUICtrlSetData ($ZSidePICInstallRead, "" ) EndIf If guictrlread($ProjectNameInputBox) = '' then MsgBox(0,"Error",'Project name required') guictrlsetstate($ProjectNameInputBox,$gui_focus) continueloop endif if guictrlread($ProjectSiteCombo) = '' Then MsgBox(0,"Error",'Project site required') guictrlsetstate($ProjectSiteCombo,$gui_focus) continueloop endif If guictrlread($RDCNumberOfProjectsInput) = '' then MsgBox(0,"Error", 'Number of projects required') guictrlsetstate($RDCNumberOfProjectsInput,$gui_focus) continueloop endif If not stringisdigit(guictrlread($RDCNumberOfProjectsInput)) then MsgBox(0,"Error",'Number of projects must be numeric') guictrlsetstate($RDCNumberOfProjectsInput,$gui_focus) continueloop endif If guictrlread($RDCRouterNameCombo) = '' then MsgBox(0,"Error",'A side router required') guictrlsetstate($RDCRouterNameCombo,$gui_focus) continueloop endif If guictrlread($RDCInterfaceTypeCombo) = '' then MsgBox(0,"Error",'A side interface type required') guictrlsetstate($RDCInterfaceTypeCombo,$gui_focus) continueloop endif If guictrlread($RDCRouterInterfacePortInput) = '' then MsgBox(0,"Error",'A side interface port required') guictrlsetstate($RDCRouterInterfacePortInput,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterNameCombo) = '' then MsgBox(0,"Error",'Z side router required') guictrlsetstate($RDCOtherRouterNameCombo,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterInterfaceTypeCombo) = '' then MsgBox(0,"Error",'Z side interface type required') guictrlsetstate($RDCOtherRouterInterfaceTypeCombo,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterInterfacePortInput) = '' then MsgBox(0,"Error",'Z side interface port required') guictrlsetstate($RDCOtherRouterInterfacePortInput,$gui_focus) continueloop endif GUICtrlSetData($RDCOtherRouterInterfacePortInput,"") GUICtrlSetData($RDCRouterInterfacePortInput,"") guictrlsetdata ($ASideFPCInstallInput,"") guictrlsetdata ($ZSideFPCInstallInput,"") guictrlsetdata ($RDCASideOpticsInstallInput,"") guictrlsetdata ($RDCASidePicInput,"") guictrlsetdata ($RDCZSidePicInput,"") guictrlsetdata ($RDCZSideFPCInstallInput, "") guictrlsetdata ($RDCASideFPCInstallInput, "") GUICtrlSetState($RDCASideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterPicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRoutersOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallFPCRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallPicRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallOpticRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCASideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) GUICtrlSetState($RDCNoInstallFPCRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallPICRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallopticRadio,$GUI_CHECKED) guictrlsetdata ($RDCZSideOpticsInstallInput,"") MSGBOX(0,"Finished", "You have entered all the information needed. Your email is being generated to be viewed before sending.");;;MSGBOX TO LET USER KNOW THEY ARE DONE AND THE EMAIL IS BEING GENERATED. ;Exit ClipPut($rdcfile = FileOpen("rdc.txt",1)) $EmailForm = GUICreate("Maintenance Email Notification", 831, 518, -1435, 222) $CoxLabel = GUICtrlCreateLabel("Maintenance Email Notification ", 25, 22, 780, 41) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $EmailEdit = GUICtrlCreateEdit("", 32, 72, 761, 401,BitOr($ES_MULTILINE, $WS_VSCROLL)) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetData(-1, "") $CopyButton = GUICtrlCreateButton("Copy To Clipboard", 680, 480, 99, 25) local $test= Fileread("rdc.txt") ClipPut($test) FileClose($rdcfile) FileDelete("rdc.txt") GUICtrlSetData($EmailEdit, ClipGet()) GUICtrlSetState($EmailEdit, $GUI_SHOW) GUISetState(@SW_SHOW) EndIf IF (guictrlread ($RDCNumberOfProjectsInput) > 1 AND ($I) >= 0) Then;;;;THIS WILL CHECK TO SEE THE NUMBER OF PROJECTS IS MORE THAN 1 BUT THAT $1 IS ZERO SO THAT WE CAN GRAB THE FIRST PART OF THE EMAIL. IF (guictrlread ($RDCNumberOfProjectsInput) > 1 AND ($I) = 0) Then;;;;THIS WILL CHECK TO SEE THE NUMBER OF PROJECTS IS MORE THAN 1 BUT THAT $1 IS ZERO SO THAT WE CAN GRAB THE FIRST PART OF THE EMAIL. ;MsgBox(0,"Variable Checker", "The number of $I is " & $I) local $aprojincr = stringregexp(guictrlread($ProjectNameInputBox),"(?<=-\d{2})([A-Z])(?=-Q)",3) local $incr_char = chr(asc($aprojincr[0])+1) guictrlsetdata($ProjectNameInputBox,StringRegExpReplace(guictrlread($ProjectNameInputBox), _ "(?<=-\d{2})([A-Z])(?=-Q)", $incr_char)) guictrlsetstate($RDCRouterInterfacePortInput,$gui_focus) $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,GUICtrlRead ($ProjectSiteCombo)) FileWrite($rdcfile, ",") FileWrite($rdcfile,@CRLF & @CRLF) FileWrite($rdcfile,"We recently have launched the below C4 projects for your system. We need on site assistance to perform the maintenance. let us know who the Point of Contact for this activity will be so we can ship the hardware and plan the maintenance. " & @CRLF & @CRLF & @CRLF & @CRLF & "Details for Capacity Projects:") FileWrite($rdcfile,@CRLF & @CRLF& @CRLF) FileWrite($rdcfile,"Project:") FileWrite($rdcfile,$RDCProjectNameRead) FileWrite($rdcfile,@CRLF & @CRLF& @CRLF) FileWrite($rdcfile,"These projects are to add an additional ") FileWrite($rdcfile, GUICtrlRead ($RDCNumberOfProjectsInput) * 10) FileWrite($rdcfile, "GB of capacity between ") FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile, " and ") FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile, ".") FileWrite($rdcfile,@CRLF & @CRLF) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile, ": Connect fiber into ") FileWrite($rdcfile, $RDCInterfaceTypeRead) FileWrite($rdcfile, "-") FileWrite($rdcfile, $RDCInterfacePortRead) FileWrite($rdcfile, @CRLF) FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile, ": Connect fiber into ") FileWrite($rdcfile, $RDCOtherInterfaceTypeRead) FileWrite($rdcfile, "-") FileWrite($rdcfile, $RDCOtherInterfacePortRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) If not GUICtrlRead ($RDCASideFPCInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCRouterNameRead) FileWrite($rdcfile,": Install FPC into slot ") FileWrite($rdcfile,$RDCASideFPCInstallInputRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf If not GUICtrlRead ($RDCZSideFPCInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCOtherRouterRead) FileWrite($rdcfile,": Install FPC into slot ") FileWrite($rdcfile,$RDCZSideFPCInstallInputRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCASidePicInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile,": Install PIC into slot ") FileWrite($rdcfile,$ASidePICInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCZSidePicInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile,": Install PIC into slot ") FileWrite($rdcfile,$ZSidePICInstallRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCASideOpticsInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile,": Install optic into slot ") FileWrite($rdcfile,$ASideOpticInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCZSideOpticsInstallInput)= "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCOtherRouterRead) FileWrite($rdcfile,": Install optic into slot ") FileWrite($rdcfile,$ZSideOpticInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if guictrlread ($ZSidePICInstallRead) = 18 Then GUICtrlSetData ($ZSidePICInstallRead, "" ) EndIf If guictrlread($ProjectNameInputBox) = '' then MsgBox(0,"Error",'Project name required') guictrlsetstate($ProjectNameInputBox,$gui_focus) continueloop endif if guictrlread($ProjectSiteCombo) = '' Then MsgBox(0,"Error",'Project site required') guictrlsetstate($ProjectSiteCombo,$gui_focus) continueloop endif If guictrlread($RDCNumberOfProjectsInput) = '' then MsgBox(0,"Error", 'Number of projects required') guictrlsetstate($RDCNumberOfProjectsInput,$gui_focus) continueloop endif If not stringisdigit(guictrlread($RDCNumberOfProjectsInput)) then MsgBox(0,"Error",'Number of projects must be numeric') guictrlsetstate($RDCNumberOfProjectsInput,$gui_focus) continueloop endif If guictrlread($RDCRouterNameCombo) = '' then MsgBox(0,"Error",'A side router required') guictrlsetstate($RDCRouterNameCombo,$gui_focus) continueloop endif If guictrlread($RDCInterfaceTypeCombo) = '' then MsgBox(0,"Error",'A side interface type required') guictrlsetstate($RDCInterfaceTypeCombo,$gui_focus) continueloop endif If guictrlread($RDCRouterInterfacePortInput) = '' then MsgBox(0,"Error",'A side interface port required') guictrlsetstate($RDCRouterInterfacePortInput,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterNameCombo) = '' then MsgBox(0,"Error",'Z side router required') guictrlsetstate($RDCOtherRouterNameCombo,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterInterfaceTypeCombo) = '' then MsgBox(0,"Error",'Z side interface type required') guictrlsetstate($RDCOtherRouterInterfaceTypeCombo,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterInterfacePortInput) = '' then MsgBox(0,"Error",'Z side interface port required') guictrlsetstate($RDCOtherRouterInterfacePortInput,$gui_focus) continueloop endif GUICtrlSetData($RDCOtherRouterInterfacePortInput,"") GUICtrlSetData($RDCRouterInterfacePortInput,"") guictrlsetdata ($ASideFPCInstallInput,"") guictrlsetdata ($ZSideFPCInstallInput,"") guictrlsetdata ($RDCASideOpticsInstallInput,"") guictrlsetdata ($RDCZSideOpticsInstallInput,"") guictrlsetdata ($RDCASidePicInput,"") guictrlsetdata ($RDCZSidePicInput,"") guictrlsetdata ($RDCZSideFPCInstallInput, "") guictrlsetdata ($RDCASideFPCInstallInput, "") GUICtrlSetState($RDCASideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterPicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRoutersOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallFPCRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallPicRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallOpticRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCASideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) GUICtrlSetState($RDCNoInstallFPCRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallPICRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallopticRadio,$GUI_CHECKED) $I= ($I + 1) ELSEIF (guictrlread ($RDCNumberOfProjectsInput) > 1 AND ($I) >= 1) Then $I= ($I + 1) IF ($I+1) = (guictrlread ($RDCNumberOfProjectsInput)) Then GUICtrlSetData ($RDCSubmitButton, "Done") EndIf local $aprojincr = stringregexp(guictrlread($ProjectNameInputBox),"(?<=-\d{2})([A-Z])(?=-Q)",3) local $incr_char = chr(asc($aprojincr[0])+1) guictrlsetdata($ProjectNameInputBox,StringRegExpReplace(guictrlread($ProjectNameInputBox), _ "(?<=-\d{2})([A-Z])(?=-Q)", $incr_char)) guictrlsetstate($RDCRouterInterfacePortInput,$gui_focus) $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,@CRLF & @CRLF) FileWrite($rdcfile,"Project:") FileWrite($rdcfile,$RDCProjectNameRead) FileWrite($rdcfile,@CRLF & @CRLF) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile, ": Connect fiber into ") FileWrite($rdcfile, $RDCInterfaceTypeRead) FileWrite($rdcfile, "-") FileWrite($rdcfile, $RDCInterfacePortRead) FileWrite($rdcfile, @CRLF) FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile, ": Connect fiber into ") FileWrite($rdcfile, $RDCOtherInterfaceTypeRead) FileWrite($rdcfile, "-") FileWrite($rdcfile, $RDCOtherInterfacePortRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) If not GUICtrlRead ($RDCASideFPCInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCRouterNameRead) FileWrite($rdcfile,": Install FPC into slot ") FileWrite($rdcfile,$RDCASideFPCInstallInputRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf If not GUICtrlRead ($RDCZSideFPCInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCOtherRouterRead) FileWrite($rdcfile,": Install FPC into slot ") FileWrite($rdcfile,$RDCZSideFPCInstallInputRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCASidePicInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile,": Install PIC into slot ") FileWrite($rdcfile,$ASidePICInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCZSidePicInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCOtherRouterRead) FileWrite($rdcfile,": Install PIC into slot ") FileWrite($rdcfile,$ZSidePICInstallRead) FileWrite($rdcfile, @CRLF & @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCASideOpticsInstallInput) = "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile, $RDCRouterNameRead) FileWrite($rdcfile,": Install optic into slot ") FileWrite($rdcfile,$ASideOpticInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if not guictrlread ($RDCZSideOpticsInstallInput)= "" Then $rdcfile = FileOpen("rdc.txt",1) FileWrite($rdcfile,$RDCOtherRouterRead) FileWrite($rdcfile,": Install optic into slot ") FileWrite($rdcfile,$ZSideOpticInstallRead) FileWrite($rdcfile, @CRLF) FileClose($rdcfile) EndIf if guictrlread ($ZSidePICInstallRead) = 18 Then GUICtrlSetData ($ZSidePICInstallRead, "" ) EndIf If guictrlread($ProjectNameInputBox) = '' then MsgBox(0,"Error",'Project name required') guictrlsetstate($ProjectNameInputBox,$gui_focus) continueloop endif if guictrlread($ProjectSiteCombo) = '' Then MsgBox(0,"Error",'Project site required') guictrlsetstate($ProjectSiteCombo,$gui_focus) continueloop endif If guictrlread($RDCNumberOfProjectsInput) = '' then MsgBox(0,"Error", 'Number of projects required') guictrlsetstate($RDCNumberOfProjectsInput,$gui_focus) continueloop endif If not stringisdigit(guictrlread($RDCNumberOfProjectsInput)) then MsgBox(0,"Error",'Number of projects must be numeric') guictrlsetstate($RDCNumberOfProjectsInput,$gui_focus) continueloop endif If guictrlread($RDCRouterNameCombo) = '' then MsgBox(0,"Error",'A side router required') guictrlsetstate($RDCRouterNameCombo,$gui_focus) continueloop endif If guictrlread($RDCInterfaceTypeCombo) = '' then MsgBox(0,"Error",'A side interface type required') guictrlsetstate($RDCInterfaceTypeCombo,$gui_focus) continueloop endif If guictrlread($RDCRouterInterfacePortInput) = '' then MsgBox(0,"Error",'A side interface port required') guictrlsetstate($RDCRouterInterfacePortInput,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterNameCombo) = '' then MsgBox(0,"Error",'Z side router required') guictrlsetstate($RDCOtherRouterNameCombo,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterInterfaceTypeCombo) = '' then MsgBox(0,"Error",'Z side interface type required') guictrlsetstate($RDCOtherRouterInterfaceTypeCombo,$gui_focus) continueloop endif If guictrlread($RDCOtherRouterInterfacePortInput) = '' then MsgBox(0,"Error",'Z side interface port required') guictrlsetstate($RDCOtherRouterInterfacePortInput,$gui_focus) continueloop endif GUICtrlSetData($RDCOtherRouterInterfacePortInput,"") GUICtrlSetData($RDCRouterInterfacePortInput,"") guictrlsetdata ($ASideFPCInstallInput,"") guictrlsetdata ($ZSideFPCInstallInput,"") guictrlsetdata ($RDCASideOpticsInstallInput,"") guictrlsetdata ($RDCZSideOpticsInstallInput,"") guictrlsetdata ($RDCASidePicInput,"") guictrlsetdata ($RDCZSidePicInput,"") guictrlsetdata ($RDCZSideFPCInstallInput, "") guictrlsetdata ($RDCASideFPCInstallInput, "") GUICtrlSetState($RDCASideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterPicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRoutersOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallFPCRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallPicRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallOpticRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCASideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) GUICtrlSetState($RDCNoInstallFPCRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallPICRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallopticRadio,$GUI_CHECKED) guictrlsetdata ($RDCZSideOpticsInstallInput,"") EndIf IF $I = (guictrlread ($RDCNumberOfProjectsInput)) Then GUISetState(@SW_HIDE) ClipPut($rdcfile = FileOpen("rdc.txt",1)) $EmailForm = GUICreate("Maintenance Email Notification", 831, 518, -1435, 222) $CoxLabel = GUICtrlCreateLabel("Maintenance Email Notification ", 25, 22, 780, 41) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $EmailEdit = GUICtrlCreateEdit("", 32, 72, 761, 401,BitOr($ES_MULTILINE, $WS_VSCROLL)) GUICtrlSetState(-1, $GUI_HIDE) GUICtrlSetData(-1, "") $CopyButton = GUICtrlCreateButton("Copy To Clipboard", 680, 480, 99, 25) local $test= Fileread("rdc.txt") ClipPut($test) FileClose($rdcfile) FileDelete("rdc.txt") GUICtrlSetData($EmailEdit, ClipGet()) GUICtrlSetState($EmailEdit, $GUI_SHOW) GUISetState() EndIf EndIf Case $C4CoreProjectTypeRadio Case $SystemProjectTypeRadio GUICtrlSetState($RDCASideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSideOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCASidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCZSidePicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterFPCInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRouterPicInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCBothRoutersOpticsInstall,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallFPCRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallPicRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCYesInstallOpticRadio,$GUI_UNCHECKED) GUICtrlSetState($RDCASideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) GUICtrlSetState($RDCNoInstallFPCRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallPICRadio,$GUI_CHECKED) GUICtrlSetState($RDCNoInstallopticRadio,$GUI_CHECKED) GUICtrlSetData($RDCOtherRouterInterfacePortInput,"") GUICtrlSetData($RDCRouterInterfacePortInput,"") guictrlsetdata ($ASideFPCInstallInput,"") guictrlsetdata ($ZSideFPCInstallInput,"") guictrlsetdata ($RDCASideOpticsInstallInput,"") guictrlsetdata ($RDCASidePicInput,"") guictrlsetdata ($RDCZSidePicInput,"") guictrlsetdata ($RDCZSideFPCInstallInput, "") guictrlsetdata ($RDCASideFPCInstallInput, "") guictrlsetdata ($RDCZSideOpticsInstallInput,"") guictrlsetdata ($RDCNumberOfProjectsInput,"") guictrlsetdata ($ProjectNameInputBox,"") GUICtrlSetState($RDCRouterNameCombo, $GUI_HIDE) GUICtrlSetState($RDCInterfaceTypeCombo, $GUI_HIDE) GUICtrlSetState($RDCRouterInterfacePortInput, $GUI_HIDE) GUICtrlSetState($RDCOtherRouterNameCombo, $GUI_HIDE) GUICtrlSetState($RDCOtherRouterInterfaceTypeCombo, $GUI_HIDE) GUICtrlSetState($RDCOtherRouterInterfacePortInput, $GUI_HIDE) GUICtrlSetState($RDCYesInstallFPCRadio, $GUI_HIDE) GUICtrlSetState($RDCNoInstallFPCRadio, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLocationInput, $GUI_HIDE) GUICtrlSetState($RDCYesInstallPicRadio, $GUI_HIDE) GUICtrlSetState($RDCNoInstallPICRadio, $GUI_HIDE) GUICtrlSetState($RDCPicInstallLocationInput, $GUI_HIDE) GUICtrlSetState($RDCYesInstallOpticRadio, $GUI_HIDE) GUICtrlSetState($RDCNoInstallOpticRadio, $GUI_HIDE) GUICtrlSetState($RDCOpticInstallLocationInput, $GUI_HIDE) GUICtrlSetState($RDCNextProjectButton, $GUI_HIDE) GUICtrlSetState($RDCClearButton, $GUI_HIDE) GUICtrlSetState($RDCSubmitButton, $GUI_HIDE) GUICtrlSetState($RDCRouterSideLabel, $GUI_HIDE) GUICtrlSetState($RDCInterfaceTypeLabel, $GUI_HIDE) GUICtrlSetState($RDCRouterInterfacePortLabel, $GUI_HIDE) GUICtrlSetState($RDCRouterNameOtherSideLabel, $GUI_HIDE) GUICtrlSetState($RDCOtherRouterInterfacePortLabel, $GUI_HIDE) GUICtrlSetState($RDCOtherRouterInterfaceTypeLabel, $GUI_HIDE) GUICtrlSetState($RDCInstallHardwareLabel, $GUI_HIDE) GUICtrlSetState($RDCFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCInstallPICLabel, $GUI_HIDE) GUICtrlSetState($RDCPICInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticLabel, $GUI_HIDE) GUICtrlSetState($RDCInputOpticLocationLabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCBothRouterFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstall, $GUI_HIDE) GUICtrlSetState($RDCFPCSideALabel, $GUI_HIDE) GUICtrlSetState($RDCASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCZSideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($RDCSideZFPCInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInstall, $GUI_HIDE) GUICtrlSetState($RDCChooseRouterPicInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCBothRouterPicInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASidePicInput, $GUI_HIDE) GUICtrlSetState($RDCInstallPICSIdeZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSidePicInput, $GUI_HIDE) GUICtrlSetState($RDCOpticsInstallLabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCBothRoutersOpticsInstall, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSIdeALabel, $GUI_HIDE) GUICtrlSetState($RDCASideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($RDCInstallOpticsSideZLabel, $GUI_HIDE) GUICtrlSetState($RDCZSideOpticsInstallInput, $GUI_HIDE) GUICtrlSetState($ASideFPCInstallInput, $GUI_HIDE) GUICtrlSetState($ZSideFPCInstallInput, $GUI_HIDE) $ProjectNameInputBox = GUICtrlCreateInput("", 48, 216, 193, 21) $ProjectSiteCombo = GUICtrlCreateCombo("", 48, 280, 193, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) $NumberOfProjectsInput = GUICtrlCreateInput("", 48, 344, 193, 21) $RouterNameCombo = GUICtrlCreateCombo("", 48, 408, 193, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) $InterfaceTypeCombo = GUICtrlCreateCombo("", 48, 472, 57, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) $RouterInterfacePortInput = GUICtrlCreateInput("", 120, 472, 89, 21) $YesInstallFPCRadio = GUICtrlCreateRadio("Yes", 512, 104, 41, 17) $NoInstallFPCRadio = GUICtrlCreateRadio("No", 576, 104, 41, 17) $ASideFPCInstallInput = GUICtrlCreateInput("", 496, 168, 193, 21) $YesInstallPicRadio = GUICtrlCreateRadio("Yes", 512, 224, 41, 17) $NoInstallPICRadio = GUICtrlCreateRadio("No", 576, 224, 41, 17) $RDCFPDCSideALabel = GUICtrlCreateLabel("Input Which Slot You Need The FPC Installed (A Side)", 456, 136, 313, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $YesInstallOpticRadio = GUICtrlCreateRadio("Yes", 512, 360, 41, 17) $NoInstallOpticRadio = GUICtrlCreateRadio("No", 576, 360, 41, 17) $NextProjectButton = GUICtrlCreateButton("Next Project", 952, 296, 99, 33) $ClearButton = GUICtrlCreateButton("Clear", 896, 360, 89, 33) $SubmitButton = GUICtrlCreateButton("Submit", 1008, 360, 89, 33) $ProjectSiteLabel = GUICtrlCreateLabel("Choose Your Project Site Location", 24, 256, 241, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RouterSideLabel = GUICtrlCreateLabel(" Choose The Router For A-Side", 24, 384, 223, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ProjectNameLabel = GUICtrlCreateLabel("Input Your Project Name", 24, 192, 185, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $TypeofProjectLabel = GUICtrlCreateLabel("Choose The Type Of Project This Is", 24, 72, 249, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $NumberOfProjectsLabel = GUICtrlCreateLabel("Input The Number Of Projects You Have Of This Kind", 24, 320, 349, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RouterInterfacePortLabel = GUICtrlCreateLabel("Choose Interface Type and Input Port Number For A-Side", 24, 448, 328, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $InstallHardwareLabel = GUICtrlCreateLabel("Choose If You Need To Install An FPC", 480, 72, 221, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $InstallPICLabel = GUICtrlCreateLabel("Choose If You Need To Install A PIC", 480, 200, 211, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $InstallOpticLabel = GUICtrlCreateLabel("Choose If You Need To Install An Optic", 480, 328, 228, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCInstallPICSIdeALabel = GUICtrlCreateLabel("Input Which Slot You Need The PIC Installed (A Side)", 456, 256, 310, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCASidePicInput = GUICtrlCreateInput("", 496, 288, 193, 21) $RDCInstallOpticsSIdeALabel = GUICtrlCreateLabel("Input Which Port You Need The Optics Installed (A Side)", 456, 392, 327, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RDCASideOpticsInstallInput = GUICtrlCreateInput("", 496, 424, 193, 21) $BypassSerialNumberLabel = GUICtrlCreateLabel("Input The Bypass Serial Number", 909, 72, 186, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $BypassSerialNumberInput = GUICtrlCreateInput("", 896, 104, 193, 21) $BypassAPortLabel = GUICtrlCreateLabel("Input The Bypass A Port", 922, 134, 142, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $BypassAPortInput = GUICtrlCreateInput("", 898, 166, 193, 21) $BypassZPortLabel = GUICtrlCreateLabel("Input The Bypass Z Port", 922, 204, 142, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $BypassZPortInput = GUICtrlCreateInput("", 902, 236, 193, 21) EndSwitch WEnd Edited May 15, 2013 by atnextc Link to comment Share on other sites More sharing options...
nitekram Posted June 6, 2013 Share Posted June 6, 2013 #include <Array.au3> $HTML = FileRead("file.txt") ;Strip all tags $HTML = StringRegExpReplace($HTML, "<[^<>]+>", "") MsgBox(0, "Test", "Stripped " & @extended & " tags.") ;Strip blank lines and not required spaces $HTML = StringRegExpReplace($HTML, "(?m)(^\s+)", "") ConsoleWrite($HTML & @CRLF)Was wondering if you might be able to assist me with your above code. I have put * to replace the characters with, but it does not seem to work as expected...I would like to be able to input something, for the blank lines, so that when I use my const I have them lined up the right way...does that make sense, and thanks for your help. 2¢ All by me:"Sometimes you have to go back to where you started, to get to where you want to go." "Everybody catches up with everyone, eventually" "As you teach others, you are really teaching yourself." From my dad "Do not worry about yesterday, as the only thing that you can control is tomorrow." WIKI | Tabs; | Arrays; | Strings | Wiki Arrays | How to ask a Question | Forum Search | FAQ | Tutorials | Original FAQ | ONLINE HELP | UDF's Wiki | AutoIt PDF AutoIt Snippets | Multple Guis | Interrupting a running function | Another Send StringRegExp | StringRegExp Help | RegEXTester | REG TUTOR | Reg TUTOT 2 AutoItSetOption | Macros | AutoIt Snippets | Wrapper | Autoit Docs SCITE | SciteJump | BB | MyTopics | Programming | UDFs | AutoIt 123 | UDFs Form | UDF Learning to script | Tutorials | Documentation | IE.AU3 | Games? | FreeSoftware | Path_Online | Core Language Programming Tips Excel Changes ControlHover.UDF GDI_Plus Draw_On_Screen GDI Basics GDI_More_Basics GDI Rotate GDI Graph GDI CheckExistingItems GDI Trajectory Replace $ghGDIPDll with $__g_hGDIPDll DLL 101? Array via Object GDI Swimlane GDI Plus French 101 Site GDI Examples UEZ GDI Basic Clock GDI Detection Ternary operator Link to comment Share on other sites More sharing options...
nitekram Posted June 6, 2013 Share Posted June 6, 2013 Found the right piece of code to remove ; remove the (?m) $HTML = StringRegExpReplace($HTML, "(^\s+)", "******") 2¢ All by me:"Sometimes you have to go back to where you started, to get to where you want to go." "Everybody catches up with everyone, eventually" "As you teach others, you are really teaching yourself." From my dad "Do not worry about yesterday, as the only thing that you can control is tomorrow." WIKI | Tabs; | Arrays; | Strings | Wiki Arrays | How to ask a Question | Forum Search | FAQ | Tutorials | Original FAQ | ONLINE HELP | UDF's Wiki | AutoIt PDF AutoIt Snippets | Multple Guis | Interrupting a running function | Another Send StringRegExp | StringRegExp Help | RegEXTester | REG TUTOR | Reg TUTOT 2 AutoItSetOption | Macros | AutoIt Snippets | Wrapper | Autoit Docs SCITE | SciteJump | BB | MyTopics | Programming | UDFs | AutoIt 123 | UDFs Form | UDF Learning to script | Tutorials | Documentation | IE.AU3 | Games? | FreeSoftware | Path_Online | Core Language Programming Tips Excel Changes ControlHover.UDF GDI_Plus Draw_On_Screen GDI Basics GDI_More_Basics GDI Rotate GDI Graph GDI CheckExistingItems GDI Trajectory Replace $ghGDIPDll with $__g_hGDIPDll DLL 101? Array via Object GDI Swimlane GDI Plus French 101 Site GDI Examples UEZ GDI Basic Clock GDI Detection Ternary operator Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now