acidman Posted March 14, 2012 Share Posted March 14, 2012 Hello again Folks... I need a little bit of help here... The directory macro @ProgramfilesDir Does not seem to be working E.g DirCreate(@ProgramFilesDir & "\Student Database\Student Info\Inifile") I've added the macro #requireadmin For administrator privileges, yet it seems not to be working! Can anyone help? [u]My dream is to have a dream...[/u] Link to comment Share on other sites More sharing options...
Moderators JLogan3o13 Posted March 14, 2012 Moderators Share Posted March 14, 2012 (edited) Hi, ac1dm4nner. This works fine on my Win 7 box. Are you looking in the Program Files or the Program Files (x86) directory for your folder?Edit: I should point out, if you want it in Program Files, add in the following:#AutoIt3Wrapper_UseX64 = y Edited March 14, 2012 by JLogan3o13 "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum! Link to comment Share on other sites More sharing options...
acidman Posted March 14, 2012 Author Share Posted March 14, 2012 Just Program Files i've set the wrapper you gave me and its still not working [u]My dream is to have a dream...[/u] Link to comment Share on other sites More sharing options...
Moderators JLogan3o13 Posted March 14, 2012 Moderators Share Posted March 14, 2012 Is that one line the sum total of your script, or are you doing other things as well? This ran fine for me, even without the #RequireAdmin. But if you're calling this as part of a function, or in a loop, the problem may lay elsewhere. You might use ConsoleWrite to output your @error, see what that tells you. "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum! Link to comment Share on other sites More sharing options...
acidman Posted March 14, 2012 Author Share Posted March 14, 2012 (edited) expandcollapse popup#cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.9.0 (beta) Author: Ryno - AC1DM4NNER Application Description: Save data to file using variable enumeration, writes/read data to Data Controls Incl. Inputs Comboboxes Datecontrols Picture Controls Default File Initialization read/write format (.ini) Also uses Excel udfs for exporting Student's Info to excel Formatted Files for report Printing Uses the custom udf excelcom_udf.au3 for picture Inserting to an excel document Multiple Graphical User Interface Distiction Used for Reading and Writing Importing of Scanned Pictures used for Certificates for Each Individual Student UseS Guionevent Method For Controls This code May seem Massive, But it's quite simple Actually. If you do not understand anything Email me at ac1dm4nz@yahoo.com OR You can Send A msg to my Inbox on the forum. #ce ---------------------------------------------------------------------------- RegWrite("HKEY_CURRENT_USER\Software\Database developers - SD - Mogolo Academy", "Software Installed", "REG_SZ", "83956895779565") #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <DateTimeConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <GuiComboBox.au3> #include <Excel.au3> #include <File.au3> #include <ExcelCom_UDF.au3> ; Just search on the forum then you'll find it... #AutoIt3Wrapper_UseX64 = y Opt("GUIResizeMode", $GUI_DOCKAUTO) Opt("GUIOnEventMode", 1) Opt("GUIDataSeparatorChar", "|") #RequireAdmin DirCreate(@ProgramFilesDir & "--Student Database\Student Info\Inifile") #region ### START Koda GUI section ### Form=c:\users\ryno\desktop\new folder\project mogolo\forms\new design.kxf $Form1 = GUICreate("Student Database - Mogolo Academy", 490, 558, 200, 130, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOx)) GUISetOnEvent($GUI_EVENT_CLOSE, "_1Close") $MenuItem1 = GUICtrlCreateMenu("&File ") $MenuItem4 = GUICtrlCreateMenuItem("Open Student File " & @TAB & "F2", $MenuItem1) GUICtrlSetOnEvent(-1, "OpenFile") $MenuItem5 = GUICtrlCreateMenuItem("Close Student File " & @TAB & "F3", $MenuItem1) $MenuItem6 = GUICtrlCreateMenuItem("Save Student File " & @TAB & "F4", $MenuItem1) GUICtrlSetOnEvent(-1, "SaveFile") $MenuItem7 = GUICtrlCreateMenuItem("Delete Student File " & @TAB & "F5", $MenuItem1) $MenuItem9 = GUICtrlCreateMenuItem("", $MenuItem1) $MenuItem8 = GUICtrlCreateMenuItem("Exit " & @TAB & "Ctrl+X", $MenuItem1) $MenuItem2 = GUICtrlCreateMenu("&Tools") $MenuItem10 = GUICtrlCreateMenu("Import", $MenuItem2) $MenuItem11 = GUICtrlCreateMenu("Scanned Certificates", $MenuItem10) $MenuItem12 = GUICtrlCreateMenuItem("Primary", $MenuItem11) $MenuItem13 = GUICtrlCreateMenuItem("Secondary", $MenuItem11) $MenuItem14 = GUICtrlCreateMenu("Print", $MenuItem2) $MenuItem15 = GUICtrlCreateMenuItem("Student File Information", $MenuItem14) GUICtrlSetOnEvent(-1, "PrintStudentFile") $MenuItem16 = GUICtrlCreateMenu("Certificates", $MenuItem14) $MenuItem17 = GUICtrlCreateMenuItem("Primary", $MenuItem16) $MenuItem18 = GUICtrlCreateMenuItem("Secondary", $MenuItem16) $MenuItem3 = GUICtrlCreateMenu("&Help") $MenuItem19 = GUICtrlCreateMenuItem("About...", $MenuItem3) $MenuItem20 = GUICtrlCreateMenuItem("Help File", $MenuItem3) $MenuItem21 = GUICtrlCreateMenuItem("Report A Bug", $MenuItem3) GUISetBkColor(0xFFFFFF) $Tab1 = GUICtrlCreateTab(0, 120, 457, 417, $TCS_HOTTRACK) $TabSheet1 = GUICtrlCreateTabItem("Student Information") $Group1 = GUICtrlCreateGroup("Student Information", 8, 152, 433, 361) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label1 = GUICtrlCreateLabel("Student Number:", 16, 184, 99, 17) GUICtrlSetColor(-1, 0x0000FF) $Label2 = GUICtrlCreateLabel("First Name:", 16, 216, 57, 17) GUICtrlSetColor(-1, 0x0000FF) $Label3 = GUICtrlCreateLabel("Middle Name:", 16, 248, 69, 17) GUICtrlSetColor(-1, 0x0000FF) $Label4 = GUICtrlCreateLabel("Surname:", 16, 280, 49, 17) GUICtrlSetColor(-1, 0x0000FF) $Label5 = GUICtrlCreateLabel("ID Number:", 16, 312, 58, 17) GUICtrlSetColor(-1, 0x0000FF) $Label6 = GUICtrlCreateLabel("Age:", 16, 344, 26, 17) GUICtrlSetColor(-1, 0x0000FF) $Label7 = GUICtrlCreateLabel("Gender:", 16, 376, 42, 17) GUICtrlSetColor(-1, 0x0000FF) $Label8 = GUICtrlCreateLabel("Course Attending:", 16, 408, 88, 17) GUICtrlSetColor(-1, 0x0000FF) $Label9 = GUICtrlCreateLabel("Year:", 16, 440, 29, 17) GUICtrlSetColor(-1, 0x0000FF) $Label10 = GUICtrlCreateLabel("Block:", 16, 472, 34, 17) GUICtrlSetColor(-1, 0x0000FF) $Input1 = GUICtrlCreateInput("Input1", 144, 184, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetColor(-1, 0x0000FF) $Input2 = GUICtrlCreateInput("Input2", 144, 216, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Input3 = GUICtrlCreateInput("Input3", 144, 248, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Input4 = GUICtrlCreateInput("Input4", 144, 280, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Input5 = GUICtrlCreateInput("Input5", 144, 312, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Input6 = GUICtrlCreateInput("Input6", 144, 344, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Group2 = GUICtrlCreateGroup("Picture", 272, 176, 161, 321) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Pic2 = GUICtrlCreatePic("C:\Users\Chris\Desktop\Project Mogolo\Pictures\face.jpg", 288, 200, 140, 244, BitOR($GUI_SS_DEFAULT_PIC, $SS_SUNKEN), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Button1 = GUICtrlCreateButton("Browse For Picture", 288, 456, 139, 25) GUICtrlSetOnEvent(-1, "ButtonBrowse") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Combo1 = GUICtrlCreateCombo("", 144, 376, 121, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "Male|Female") $Input7 = GUICtrlCreateInput("Input7", 144, 408, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Input8 = GUICtrlCreateInput("Input8", 144, 440, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Input9 = GUICtrlCreateInput("Input9", 144, 472, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet2 = GUICtrlCreateTabItem("Course Information") $Group3 = GUICtrlCreateGroup("Course Information", 16, 152, 425, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $Group4 = GUICtrlCreateGroup("", 24, 168, 201, 353) $Label11 = GUICtrlCreateLabel("Date of First Register:", 32, 184, 106, 17) GUICtrlSetColor(-1, 0x0000FF) $Date1 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 32, 208, 186, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label12 = GUICtrlCreateLabel("Duration:", 32, 320, 47, 17) GUICtrlSetColor(-1, 0x0000FF) $Input10 = GUICtrlCreateInput("Input10", 96, 320, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label13 = GUICtrlCreateLabel("Cost:", 32, 344, 28, 17) GUICtrlSetColor(-1, 0x0000FF) $Input11 = GUICtrlCreateInput("Input11", 96, 344, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label14 = GUICtrlCreateLabel("Block:", 32, 368, 34, 17) GUICtrlSetColor(-1, 0x0000FF) $Input12 = GUICtrlCreateInput("Input12", 96, 368, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label15 = GUICtrlCreateLabel("First Timer:", 32, 440, 55, 17) GUICtrlSetColor(-1, 0x0000FF) $Input13 = GUICtrlCreateInput("Input13", 96, 440, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label16 = GUICtrlCreateLabel("Repeater:", 32, 464, 51, 17) GUICtrlSetColor(-1, 0x0000FF) $Input14 = GUICtrlCreateInput("Input14", 96, 464, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label17 = GUICtrlCreateLabel("Attendance Per Block:", 32, 488, 111, 17) GUICtrlSetColor(-1, 0x0000FF) GUICtrlSetColor(-1, 0x0000FF) $Input15 = GUICtrlCreateInput("Input15", 144, 488, 73, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group5 = GUICtrlCreateGroup("", 232, 168, 201, 353) $Label18 = GUICtrlCreateLabel("# Times In Level:", 240, 184, 86, 17) GUICtrlSetColor(-1, 0x0000FF) $Input16 = GUICtrlCreateInput("Input16", 328, 184, 97, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label19 = GUICtrlCreateLabel("1)Level:", 240, 208, 40, 17) GUICtrlSetColor(-1, 0x0000FF) $Input17 = GUICtrlCreateInput("Input17", 304, 208, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label20 = GUICtrlCreateLabel("1)Subject:", 240, 232, 50, 17) GUICtrlSetColor(-1, 0x0000FF) $Input18 = GUICtrlCreateInput("Input18", 304, 232, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label21 = GUICtrlCreateLabel("1)Facilitator:", 240, 256, 60, 17) GUICtrlSetColor(-1, 0x0000FF) $Input19 = GUICtrlCreateInput("Input19", 304, 256, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label22 = GUICtrlCreateLabel("2)Level:", 240, 320, 40, 17) GUICtrlSetColor(-1, 0x0000FF) $Input20 = GUICtrlCreateInput("Input20", 304, 320, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label23 = GUICtrlCreateLabel("2)Subject:", 240, 344, 50, 17) GUICtrlSetColor(-1, 0x0000FF) $Input21 = GUICtrlCreateInput("Input21", 304, 344, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label24 = GUICtrlCreateLabel("2)Facilitator:", 240, 368, 60, 17) GUICtrlSetColor(-1, 0x0000FF) $Input22 = GUICtrlCreateInput("Input22", 304, 368, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label25 = GUICtrlCreateLabel("3)Level:", 240, 440, 40, 17) GUICtrlSetColor(-1, 0x0000FF) $Input23 = GUICtrlCreateInput("Input23", 304, 440, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label26 = GUICtrlCreateLabel("3)Subject:", 240, 464, 50, 17) GUICtrlSetColor(-1, 0x0000FF) $Input24 = GUICtrlCreateInput("Input24", 304, 464, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label27 = GUICtrlCreateLabel("3)Facilitator:", 240, 488, 60, 17) GUICtrlSetColor(-1, 0x0000FF) $Input25 = GUICtrlCreateInput("Input25", 304, 488, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet3 = GUICtrlCreateTabItem("Personal Details") $Group6 = GUICtrlCreateGroup("Personal Details", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $Group7 = GUICtrlCreateGroup("", 16, 168, 193, 353) $Label28 = GUICtrlCreateLabel("Initials:", 24, 184, 45, 17) GUICtrlSetColor(-1, 0x0000FF) $Input26 = GUICtrlCreateInput("Input26", 24, 208, 169, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label29 = GUICtrlCreateLabel("Title:", 24, 232, 33, 17) GUICtrlSetColor(-1, 0x0000FF) $Input27 = GUICtrlCreateInput("Input27", 24, 256, 169, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label30 = GUICtrlCreateLabel("Equity:", 24, 280, 43, 17) GUICtrlSetColor(-1, 0x0000FF) $Input28 = GUICtrlCreateInput("Input28", 24, 304, 169, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label31 = GUICtrlCreateLabel("Gender:", 24, 352, 49, 17) GUICtrlSetColor(-1, 0x0000FF) $Combo2 = GUICtrlCreateCombo("", 24, 376, 169, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetData(-1, "Male|Female") $Label32 = GUICtrlCreateLabel("Nationality:", 24, 408, 68, 17) GUICtrlSetColor(-1, 0x0000FF) $Input29 = GUICtrlCreateInput("Input29", 24, 432, 169, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label33 = GUICtrlCreateLabel("Citizen Status:", 24, 464, 86, 17) GUICtrlSetColor(-1, 0x0000FF) $Input30 = GUICtrlCreateInput("Input30", 24, 488, 169, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group8 = GUICtrlCreateGroup("", 216, 168, 209, 353) $Label34 = GUICtrlCreateLabel("Date of Birth:", 224, 184, 80, 17) GUICtrlSetColor(-1, 0x0000FF) $Date2 = GUICtrlCreateDate("@year&@mon&@Mday", 224, 208, 186, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetCursor(-1, 0) $Label35 = GUICtrlCreateLabel("Disability Description:", 224, 240, 127, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit1 = GUICtrlCreateEdit("", 224, 264, 185, 73, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetData(-1, "Edit1") $Label36 = GUICtrlCreateLabel("Home Language:", 224, 352, 100, 17) GUICtrlSetColor(-1, 0x0000FF) $Input31 = GUICtrlCreateInput("Input31", 224, 376, 185, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label37 = GUICtrlCreateLabel("Alternative ID Type:", 224, 408, 118, 17) GUICtrlSetColor(-1, 0x0000FF) $Input32 = GUICtrlCreateInput("Input32", 224, 432, 185, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label38 = GUICtrlCreateLabel("ID no:", 224, 464, 39, 17) GUICtrlSetColor(-1, 0x0000FF) $Input33 = GUICtrlCreateInput("Input33", 224, 488, 185, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet4 = GUICtrlCreateTabItem("Contact Details") $Group9 = GUICtrlCreateGroup("Contact Details", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group10 = GUICtrlCreateGroup("", 16, 168, 185, 321) $Label39 = GUICtrlCreateLabel("Phone Number:", 24, 184, 78, 17) GUICtrlSetColor(-1, 0x0000FF) $Input34 = GUICtrlCreateInput("Input34", 24, 208, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label40 = GUICtrlCreateLabel("Cell Number:", 24, 248, 64, 17) GUICtrlSetColor(-1, 0x0000FF) $Input35 = GUICtrlCreateInput("Input35", 24, 272, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label41 = GUICtrlCreateLabel("Fax Number:", 24, 304, 64, 17) GUICtrlSetColor(-1, 0x0000FF) $Input36 = GUICtrlCreateInput("Input36", 24, 328, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label42 = GUICtrlCreateLabel("Home Address:", 24, 360, 76, 17) GUICtrlSetColor(-1, 0x0000FF) $Input37 = GUICtrlCreateInput("Input37", 24, 384, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label43 = GUICtrlCreateLabel("E-mail Address:", 24, 416, 76, 17) GUICtrlSetColor(-1, 0x0000FF) $Input38 = GUICtrlCreateInput("Input38", 24, 448, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group11 = GUICtrlCreateGroup("", 224, 184, 201, 305) $Label44 = GUICtrlCreateLabel("Postal Address:", 288, 208, 77, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit2 = GUICtrlCreateEdit("", 232, 240, 185, 193, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetData(-1, "Edit2") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet6 = GUICtrlCreateTabItem("Employement Details") $Group12 = GUICtrlCreateGroup("Employement Details:", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group13 = GUICtrlCreateGroup("", 16, 168, 177, 353) $Radio1 = GUICtrlCreateLabel("Employement Status:", 24, 184, 113, 17) GUICtrlSetColor(-1, 0x0000FF) GUICtrlSetOnEvent(-1, "Rad1") $Radio2 = GUICtrlCreateCombo("", 24, 208, 113, 17) GUICtrlSetData(-1, "Employed|Unemployed") GUICtrlSetOnEvent(-1, "Rad2") $Label45 = GUICtrlCreateLabel("Employer:", 32, 240, 50, 17) GUICtrlSetColor(-1, 0x0000FF) $Input39 = GUICtrlCreateInput("Input39", 32, 264, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label46 = GUICtrlCreateLabel("Manager:", 32, 304, 49, 17) GUICtrlSetColor(-1, 0x0000FF) $Input40 = GUICtrlCreateInput("Input40", 32, 328, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label47 = GUICtrlCreateLabel("Job Title:", 32, 360, 47, 17) GUICtrlSetColor(-1, 0x0000FF) $Input41 = GUICtrlCreateInput("Input41", 32, 384, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label48 = GUICtrlCreateLabel("Department:", 32, 416, 62, 17) GUICtrlSetColor(-1, 0x0000FF) $Input42 = GUICtrlCreateInput("Input42", 32, 440, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label49 = GUICtrlCreateLabel("Province:", 32, 464, 49, 17) GUICtrlSetColor(-1, 0x0000FF) $Combo3 = GUICtrlCreateCombo("Combo3", 32, 488, 145, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "North-west|Northen-Province|Limpopo|Mpumalanga|Free-State|Kwazulu-Natal|Western-Cape|Northen-Cape|Gauteng") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet7 = GUICtrlCreateTabItem("Emergency Contact Details") $Group14 = GUICtrlCreateGroup("Emergency Contact Details:", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group15 = GUICtrlCreateGroup("Next of Kin:", 16, 168, 177, 353) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label50 = GUICtrlCreateLabel("Name:", 32, 192, 40, 17) GUICtrlSetColor(-1, 0x0000FF) $Input43 = GUICtrlCreateInput("Input43", 32, 216, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label51 = GUICtrlCreateLabel("Relationship:", 32, 256, 78, 17) GUICtrlSetColor(-1, 0x0000FF) $Input44 = GUICtrlCreateInput("Input44", 32, 280, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label52 = GUICtrlCreateLabel("Residential Address:", 32, 320, 120, 17) GUICtrlSetColor(-1, 0x0000FF) $Input45 = GUICtrlCreateInput("Input45", 32, 344, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label53 = GUICtrlCreateLabel("Cell #:", 32, 384, 41, 17) GUICtrlSetColor(-1, 0x0000FF) $Input46 = GUICtrlCreateInput("Input46", 32, 408, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label54 = GUICtrlCreateLabel("Home #:", 32, 448, 52, 17) GUICtrlSetColor(-1, 0x0000FF) $Input47 = GUICtrlCreateInput("Input47", 32, 472, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group18 = GUICtrlCreateGroup("Medical Aid:", 208, 168, 153, 73) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Radio3 = GUICtrlCreateCombo("", 216, 184, 130, 17) GUICtrlSetData(-1, "Yes|No") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet8 = GUICtrlCreateTabItem("Guardian Contact Details") $Group16 = GUICtrlCreateGroup("Guardian Conact Details:", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group17 = GUICtrlCreateGroup("", 16, 168, 169, 353) $Label56 = GUICtrlCreateLabel("Name:", 24, 192, 35, 17) GUICtrlSetColor(-1, 0x0000FF) $Input48 = GUICtrlCreateInput("Input48", 24, 216, 137, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label57 = GUICtrlCreateLabel("ID #:", 24, 248, 28, 17) GUICtrlSetColor(-1, 0x0000FF) $Input49 = GUICtrlCreateInput("Input49", 24, 272, 137, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label58 = GUICtrlCreateLabel("Home Address::", 24, 304, 79, 17) GUICtrlSetColor(-1, 0x0000FF) $Input50 = GUICtrlCreateInput("Input50", 24, 328, 137, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label59 = GUICtrlCreateLabel("Home #:", 24, 360, 45, 17) GUICtrlSetColor(-1, 0x0000FF) $Input51 = GUICtrlCreateInput("Input51", 24, 384, 137, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label60 = GUICtrlCreateLabel("Cell #:", 24, 416, 34, 17) GUICtrlSetColor(-1, 0x0000FF) $Input52 = GUICtrlCreateInput("Input52", 24, 440, 137, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group19 = GUICtrlCreateGroup("", 200, 176, 201, 337) $Label55 = GUICtrlCreateLabel("Postal Address:", 248, 192, 77, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit3 = GUICtrlCreateEdit("", 208, 224, 185, 217, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetData(-1, "Edit3") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet9 = GUICtrlCreateTabItem("Educational History") $Group20 = GUICtrlCreateGroup("Educational History:", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group21 = GUICtrlCreateGroup("Primary", 16, 168, 145, 353) $Label61 = GUICtrlCreateLabel("Highest Level Passed:", 24, 192, 110, 17) GUICtrlSetColor(-1, 0x0000FF) $Input53 = GUICtrlCreateInput("Input53", 24, 216, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label62 = GUICtrlCreateLabel("Institution/School:", 24, 240, 90, 17) GUICtrlSetColor(-1, 0x0000FF) $Input54 = GUICtrlCreateInput("Input54", 24, 264, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label63 = GUICtrlCreateLabel("Year Obtained:", 24, 288, 75, 17) GUICtrlSetColor(-1, 0x0000FF) $Input55 = GUICtrlCreateInput("Input55", 24, 312, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label64 = GUICtrlCreateLabel("Subjects:", 24, 344, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton1 = GUICtrlCreateButton("View/Add", 24, 368, 124, 30, BitOR($BS_NOTIFY, $BS_FLAT)) GUICtrlSetOnEvent(-1, "FormPsView") $Label65 = GUICtrlCreateLabel("Certificates:", 24, 448, 59, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton2 = GUICtrlCreateButton("View/Add", 24, 472, 124, 30, BitOR($BS_NOTIFY, $BS_FLAT)) GUICtrlSetOnEvent(-1, "FormCview") GUICtrlCreateGroup("", -99, -99, 1, 1) $Group22 = GUICtrlCreateGroup("Secondary", 168, 168, 145, 353) $Label66 = GUICtrlCreateLabel("Highest Level Passed:", 176, 192, 110, 17) GUICtrlSetColor(-1, 0x0000FF) $Input56 = GUICtrlCreateInput("Input56", 176, 216, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label67 = GUICtrlCreateLabel("Institution/School:", 176, 240, 90, 17) GUICtrlSetColor(-1, 0x0000FF) $Input57 = GUICtrlCreateInput("Input57", 176, 264, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label68 = GUICtrlCreateLabel("Year Obtained:", 176, 288, 75, 17) GUICtrlSetColor(-1, 0x0000FF) $Input58 = GUICtrlCreateInput("Input58", 176, 312, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label69 = GUICtrlCreateLabel("Subjects:", 176, 344, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton3 = GUICtrlCreateButton("View/Add", 176, 368, 124, 30, BitOR($BS_NOTIFY, $BS_FLAT)) GUICtrlSetOnEvent(-1, "FormC1") $Label70 = GUICtrlCreateLabel("Certificates:", 176, 448, 59, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton4 = GUICtrlCreateButton("View/Add", 176, 472, 124, 30, BitOR($BS_NOTIFY, $BS_FLAT)) GUICtrlSetOnEvent(-1, "FormSS1") GUICtrlCreateGroup("", -99, -99, 1, 1) $Group23 = GUICtrlCreateGroup("Abet", 320, 168, 121, 177) $Label71 = GUICtrlCreateLabel("Previous Abet Level:", 328, 192, 102, 17) GUICtrlSetColor(-1, 0x0000FF) $Input59 = GUICtrlCreateInput("Input59", 328, 216, 105, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label72 = GUICtrlCreateLabel("Year Attended:", 328, 240, 75, 17) GUICtrlSetColor(-1, 0x0000FF) $Input60 = GUICtrlCreateInput("Input60", 328, 264, 105, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label73 = GUICtrlCreateLabel("Block Attended:", 328, 288, 80, 17) GUICtrlSetColor(-1, 0x0000FF) $Input61 = GUICtrlCreateInput("Input61", 328, 312, 105, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group24 = GUICtrlCreateGroup("N Levels", 320, 344, 121, 177) $Label74 = GUICtrlCreateLabel("Subjects:", 328, 360, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton5 = GUICtrlCreateButton("View/Add", 328, 376, 108, 22, BitOR($BS_NOTIFY, $BS_FLAT)) GUICtrlSetOnEvent(-1, "FormNview") $Label75 = GUICtrlCreateLabel("Level Attended:", 328, 400, 79, 17) GUICtrlSetColor(-1, 0x0000FF) $Input62 = GUICtrlCreateInput("Input62", 328, 424, 105, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label76 = GUICtrlCreateLabel("Year Attended:", 328, 448, 75, 17) GUICtrlSetColor(-1, 0x0000FF) $Input63 = GUICtrlCreateInput("Input63", 328, 472, 105, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet10 = GUICtrlCreateTabItem("Screening History") $Group25 = GUICtrlCreateGroup("Screening History", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group26 = GUICtrlCreateGroup("RESULTS IF APPLICABLE", 16, 168, 425, 353) $Group27 = GUICtrlCreateGroup("", 24, 184, 129, 321) $Label77 = GUICtrlCreateLabel("Subjects:", 32, 200, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton6 = GUICtrlCreateButton("View/add", 32, 224, 116, 30, BitOR($BS_NOTIFY, $BS_FLAT)) $Label78 = GUICtrlCreateLabel("Level:", 32, 272, 33, 17) GUICtrlSetColor(-1, 0x0000FF) $Input64 = GUICtrlCreateInput("Input64", 32, 296, 113, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label79 = GUICtrlCreateLabel("Date:", 32, 320, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date3 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 32, 344, 114, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group28 = GUICtrlCreateGroup("", 160, 184, 129, 193) $Label80 = GUICtrlCreateLabel("Subjects:", 168, 200, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $Label81 = GUICtrlCreateLabel("Level:", 168, 272, 33, 17) GUICtrlSetColor(-1, 0x0000FF) $Label82 = GUICtrlCreateLabel("Date:", 168, 320, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton7 = GUICtrlCreateButton("View/Add", 168, 224, 108, 30, BitOR($BS_NOTIFY, $BS_FLAT)) $Input65 = GUICtrlCreateInput("Input65", 168, 296, 113, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Date4 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 168, 344, 114, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group29 = GUICtrlCreateGroup("", 296, 184, 137, 321) $Label84 = GUICtrlCreateLabel("Subjects:", 304, 200, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $MyButton8 = GUICtrlCreateButton("View/Add", 304, 224, 116, 30, BitOR($BS_NOTIFY, $BS_FLAT)) $Label85 = GUICtrlCreateLabel("Level:", 304, 272, 33, 17) GUICtrlSetColor(-1, 0x0000FF) $Input66 = GUICtrlCreateInput("Input66", 304, 296, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label86 = GUICtrlCreateLabel("Date:", 304, 320, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date5 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 304, 344, 122, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group30 = GUICtrlCreateGroup("Recommended Starting", 160, 376, 129, 129) $Label83 = GUICtrlCreateLabel("Level:", 168, 400, 33, 17) GUICtrlSetColor(-1, 0x0000FF) $Combo4 = GUICtrlCreateCombo("Combo4", 168, 432, 113, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL)) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet11 = GUICtrlCreateTabItem("Payment History") $Group31 = GUICtrlCreateGroup("Payment History", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group32 = GUICtrlCreateGroup("", 16, 168, 417, 345, -1) $Label87 = GUICtrlCreateLabel("Course:", 24, 184, 40, 17) GUICtrlSetColor(-1, 0x0000FF) $Input67 = GUICtrlCreateInput("Input67", 72, 184, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label88 = GUICtrlCreateLabel("Level:", 24, 208, 33, 17) GUICtrlSetColor(-1, 0x0000FF) $Input68 = GUICtrlCreateInput("Input68", 72, 208, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label89 = GUICtrlCreateLabel("Block:", 24, 232, 34, 17) GUICtrlSetColor(-1, 0x0000FF) $Input69 = GUICtrlCreateInput("Input69", 72, 232, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label90 = GUICtrlCreateLabel("Price:", 24, 256, 31, 17) GUICtrlSetColor(-1, 0x0000FF) $Input70 = GUICtrlCreateInput("Input70", 72, 256, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label91 = GUICtrlCreateLabel("Payment Type:", 24, 320, 75, 17) GUICtrlSetColor(-1, 0x0000FF) $Combo5 = GUICtrlCreateCombo("Combo5", 24, 344, 169, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "EFT|Cash|Cheque") $Label92 = GUICtrlCreateLabel("Person Responsible for Payment:", 24, 376, 160, 17) GUICtrlSetColor(-1, 0x0000FF) $Input71 = GUICtrlCreateInput("Input71", 24, 400, 161, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label93 = GUICtrlCreateLabel("Receipt#:", 24, 424, 51, 17) GUICtrlSetColor(-1, 0x0000FF) $Input72 = GUICtrlCreateInput("Input72", 24, 448, 161, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label94 = GUICtrlCreateLabel("Payment Setup", 208, 184, 76, 17) GUICtrlSetColor(-1, 0x0000FF) $Label95 = GUICtrlCreateLabel("Full Amount:", 208, 208, 62, 17) GUICtrlSetColor(-1, 0x0000FF) $Input73 = GUICtrlCreateInput("Input73", 304, 208, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label96 = GUICtrlCreateLabel("Date:", 208, 232, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date6 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 248, 232, 178, 21) $Label97 = GUICtrlCreateLabel("Deposit Amount:", 208, 256, 82, 17) GUICtrlSetColor(-1, 0x0000FF) $Input74 = GUICtrlCreateInput("Input74", 304, 256, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label98 = GUICtrlCreateLabel("Date:", 208, 280, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date7 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 248, 280, 178, 21) $Label99 = GUICtrlCreateLabel("Monthly Amount:", 208, 304, 83, 17) GUICtrlSetColor(-1, 0x0000FF) $Input75 = GUICtrlCreateInput("Input75", 304, 304, 121, 21) $Label100 = GUICtrlCreateLabel("Date:", 208, 328, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date8 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 248, 328, 178, 21) $Label101 = GUICtrlCreateLabel("PAYMENT RECORD", 208, 352, 105, 17) GUICtrlSetColor(-1, 0x0000FF) $Label102 = GUICtrlCreateLabel("Total Owing:", 208, 376, 64, 17) GUICtrlSetColor(-1, 0x0000FF) $Input76 = GUICtrlCreateInput("Input76", 304, 376, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label103 = GUICtrlCreateLabel("Paid to Date:", 208, 408, 66, 17) GUICtrlSetColor(-1, 0x0000FF) $Input77 = GUICtrlCreateInput("Input77", 304, 408, 121, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label104 = GUICtrlCreateLabel("Amount outstanding:", 208, 448, 101, 17) GUICtrlSetColor(-1, 0x0000FF) $Input78 = GUICtrlCreateInput("Input78", 312, 448, 113, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet12 = GUICtrlCreateTabItem("Comments") $Group33 = GUICtrlCreateGroup("Comments", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group34 = GUICtrlCreateGroup("", 16, 168, 217, 353) $Label105 = GUICtrlCreateLabel("Dropped:", 24, 184, 48, 17) GUICtrlSetColor(-1, 0x0000FF) $Input79 = GUICtrlCreateInput("Input79", 80, 184, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label106 = GUICtrlCreateLabel("Reason:", 24, 208, 44, 17) GUICtrlSetColor(-1, 0x0000FF) $Input80 = GUICtrlCreateInput("Input80", 80, 208, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label107 = GUICtrlCreateLabel("Year:", 24, 232, 29, 17) GUICtrlSetColor(-1, 0x0000FF) $Input81 = GUICtrlCreateInput("Input81", 80, 232, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label108 = GUICtrlCreateLabel("Block:", 24, 256, 34, 17) $Input82 = GUICtrlCreateInput("Input82", 80, 256, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label109 = GUICtrlCreateLabel("Date:", 24, 280, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date9 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 80, 280, 146, 21) $Label110 = GUICtrlCreateLabel("Condoned:", 24, 304, 56, 17) GUICtrlSetColor(-1, 0x0000FF) $Input83 = GUICtrlCreateInput("Input83", 80, 304, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label111 = GUICtrlCreateLabel("Year:", 24, 328, 29, 17) GUICtrlSetColor(-1, 0x0000FF) $Input84 = GUICtrlCreateInput("Input84", 80, 328, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label112 = GUICtrlCreateLabel("Block:", 24, 352, 34, 17) GUICtrlSetColor(-1, 0x0000FF) $Input85 = GUICtrlCreateInput("Input85", 80, 352, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label113 = GUICtrlCreateLabel("Date:", 24, 376, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date10 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 80, 376, 146, 21) $Label114 = GUICtrlCreateLabel("Passed:", 24, 400, 56, 17) GUICtrlSetColor(-1, 0x0000FF) $Input86 = GUICtrlCreateInput("Input86", 80, 400, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label115 = GUICtrlCreateLabel("Year:", 24, 424, 29, 17) GUICtrlSetColor(-1, 0x0000FF) $Input87 = GUICtrlCreateInput("Input87", 80, 424, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label116 = GUICtrlCreateLabel("Block:", 24, 448, 34, 17) GUICtrlSetColor(-1, 0x0000FF) $Input88 = GUICtrlCreateInput("Input88", 80, 448, 145, 21, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) $Label117 = GUICtrlCreateLabel("Date:", 24, 472, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date11 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 80, 472, 146, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group35 = GUICtrlCreateGroup("", 248, 184, 185, 329) $Label119 = GUICtrlCreateLabel("Allergies/Chronic Illness:", 264, 200, 119, 17) $Edit4 = GUICtrlCreateEdit("", 264, 224, 145, 273, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetData(-1, "Edit4") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet13 = GUICtrlCreateTabItem("History at Mogolo") $Group36 = GUICtrlCreateGroup("History At Mogolo", 8, 152, 441, 377) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group37 = GUICtrlCreateGroup("", 16, 168, 425, 353) $Label120 = GUICtrlCreateLabel("Comment:", 24, 184, 51, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit5 = GUICtrlCreateEdit("", 24, 208, 97, 193, BitOR($ES_AUTOVSCROLL, $ES_WANTRETURN, $WS_VSCROLL)) GUICtrlSetData(-1, "Edit5") $Label121 = GUICtrlCreateLabel("Date:", 24, 408, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date12 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 24, 432, 98, 21) $Label122 = GUICtrlCreateLabel("Facilitator:", 24, 464, 52, 17) GUICtrlSetColor(-1, 0x0000FF) $Input90 = GUICtrlCreateInput("Input90", 24, 488, 97, 21) $Label123 = GUICtrlCreateLabel("Comment:", 128, 184, 51, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit6 = GUICtrlCreateEdit("", 128, 208, 97, 193) GUICtrlSetData(-1, "Edit6") $Label124 = GUICtrlCreateLabel("Date:", 128, 408, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date13 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 128, 432, 98, 21) $Label125 = GUICtrlCreateLabel("Facilitator:", 128, 464, 52, 17) GUICtrlSetColor(-1, 0x0000FF) $Input91 = GUICtrlCreateInput("Input91", 128, 488, 97, 21) $Label126 = GUICtrlCreateLabel("Comment:", 232, 184, 51, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit7 = GUICtrlCreateEdit("", 232, 208, 97, 193) GUICtrlSetData(-1, "Edit7") $Label127 = GUICtrlCreateLabel("Date:", 232, 408, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date14 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 232, 432, 98, 21) $Label128 = GUICtrlCreateLabel("Facilitator:", 232, 464, 52, 17) GUICtrlSetColor(-1, 0x0000FF) $Input92 = GUICtrlCreateInput("Input92", 232, 488, 97, 21) $Label129 = GUICtrlCreateLabel("Comment:", 336, 184, 51, 17) GUICtrlSetColor(-1, 0x0000FF) $Edit8 = GUICtrlCreateEdit("", 336, 208, 97, 193) GUICtrlSetData(-1, "Edit8") $Label130 = GUICtrlCreateLabel("Date:", 336, 408, 30, 17) GUICtrlSetColor(-1, 0x0000FF) $Date15 = GUICtrlCreateDate(@YEAR & @MON & @MDAY, 336, 432, 98, 21) $Label131 = GUICtrlCreateLabel("Facilitator:", 336, 464, 52, 17) GUICtrlSetColor(-1, 0x0000FF) $Input93 = GUICtrlCreateInput("Input93", 336, 488, 97, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateTabItem("") $Pic1 = GUICtrlCreatePic("C:\Users\Chris\Desktop\Project Mogolo\Pictures\Mogolo Label.jpg", 0, 0, 452, 116, BitOR($GUI_SS_DEFAULT_PIC, $SS_SUNKEN), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKHCENTER + $GUI_DOCKWIDTH) Dim $_AccelTable[5][2] = [["{F2}", $MenuItem4],["{F3}", $MenuItem5],["{F4}", $MenuItem6],["{F5}", $MenuItem7],["^x", $MenuItem8]] GUISetAccelerators($_AccelTable) GUISetState(@SW_SHOW) $FormCert = GUICreate("Primary Certificates", 330, 648, 192, 124) GUISetOnEvent($GUI_EVENT_CLOSE, "FormCert") $ButtonC = GUICtrlCreateButton("Browse for Certificate", 16, 8, 155, 25) $ComboC = GUICtrlCreateCombo("", 16, 40, 153, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL)) $PicC = GUICtrlCreatePic("C:\Documents and Settings\Chris\Desktop\New Folder\Pictures\Car pics\93 Toyota Supra Turbo.jpg", 8, 72, 300, 564) $ButtonC = GUICtrlCreateButton("Save", 232, 40, 75, 25) ControlDisable("Certificates", "", $ButtonC) $ButtonC = GUICtrlCreateButton("Open", 232, 8, 75, 25) GUISwitch($Form1) $FormCert1 = GUICreate("Secondary Certificates", 330, 648, 192, 124) GUISetOnEvent($GUI_EVENT_CLOSE, "FormCert1") $ButtonC1 = GUICtrlCreateButton("Browse for Certificate", 16, 8, 155, 25) $ComboC1 = GUICtrlCreateCombo("", 16, 40, 153, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL)) $PicC1 = GUICtrlCreatePic("C:\Documents and Settings\Chris\Desktop\New Folder\Pictures\Car pics\93 Toyota Supra Turbo.jpg", 8, 72, 300, 564) $ButtonC2 = GUICtrlCreateButton("Save", 232, 40, 75, 25) ControlDisable("Certificates", "", $ButtonC2) $ButtonC3 = GUICtrlCreateButton("Open", 232, 8, 75, 25) GUISwitch($Form1) $FormPSubs = GUICreate("Primary Sub's", 188, 347, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, "FormPSubs") $LabelPS1 = GUICtrlCreateLabel("01", 8, 8, 16, 17) $LabelPS2 = GUICtrlCreateLabel("02", 8, 32, 16, 17) $LabelPS3 = GUICtrlCreateLabel("03", 8, 56, 16, 17) $LabelPS4 = GUICtrlCreateLabel("04", 8, 80, 16, 17) $LabelPS5 = GUICtrlCreateLabel("05", 8, 104, 16, 17) $LabelPS6 = GUICtrlCreateLabel("06", 8, 128, 16, 17) $LabelPS7 = GUICtrlCreateLabel("07", 8, 152, 16, 17) $LabelPS8 = GUICtrlCreateLabel("08", 8, 176, 16, 17) $LabelPS9 = GUICtrlCreateLabel("09", 8, 200, 16, 17) $LabelPS10 = GUICtrlCreateLabel("10", 8, 224, 16, 17) $LabelPS11 = GUICtrlCreateLabel("11", 8, 248, 16, 17) $LabelPS12 = GUICtrlCreateLabel("12", 8, 272, 16, 17) $LabelPS13 = GUICtrlCreateLabel("13", 8, 296, 16, 17) $InputPS1 = GUICtrlCreateInput("", 32, 8, 121, 21) $InputPS2 = GUICtrlCreateInput("", 32, 32, 121, 21) $InputPS3 = GUICtrlCreateInput("", 32, 56, 121, 21) $InputPS4 = GUICtrlCreateInput("", 32, 80, 121, 21) $InputPS5 = GUICtrlCreateInput("", 32, 104, 121, 21) $InputPS6 = GUICtrlCreateInput("", 32, 128, 121, 21) $InputPS7 = GUICtrlCreateInput("", 32, 152, 121, 21) $InputPS8 = GUICtrlCreateInput("", 32, 176, 121, 21) $InputPS9 = GUICtrlCreateInput("", 32, 200, 121, 21) $InputPS10 = GUICtrlCreateInput("", 32, 224, 121, 21) $InputPS11 = GUICtrlCreateInput("", 32, 248, 121, 21) $InputPS12 = GUICtrlCreateInput("", 32, 272, 121, 21) $InputPS13 = GUICtrlCreateInput("", 32, 296, 121, 21) $ButtonPS1 = GUICtrlCreateButton("Save", 32, 320, 123, 17) $ButtonPS2 = GUICtrlCreateButton("X", 160, 8, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Delete") $ButtonPS3 = GUICtrlCreateButton("X", 160, 32, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS4 = GUICtrlCreateButton("X", 160, 56, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS5 = GUICtrlCreateButton("X", 160, 80, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS6 = GUICtrlCreateButton("X", 160, 104, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS7 = GUICtrlCreateButton("X", 160, 128, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS8 = GUICtrlCreateButton("X", 160, 152, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS9 = GUICtrlCreateButton("X", 160, 176, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS10 = GUICtrlCreateButton("X", 160, 200, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS11 = GUICtrlCreateButton("X", 160, 224, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS12 = GUICtrlCreateButton("X", 160, 248, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS13 = GUICtrlCreateButton("X", 160, 272, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonPS14 = GUICtrlCreateButton("X", 160, 296, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUISwitch($Form1) $FormSSUBS = GUICreate("Primary Sub's", 188, 347, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, "FormSSUBS") $LabelSS1 = GUICtrlCreateLabel("01", 8, 8, 16, 17) $LabelSS2 = GUICtrlCreateLabel("02", 8, 32, 16, 17) $LabelSS3 = GUICtrlCreateLabel("03", 8, 56, 16, 17) $LabelSS4 = GUICtrlCreateLabel("04", 8, 80, 16, 17) $LabelSS5 = GUICtrlCreateLabel("05", 8, 104, 16, 17) $LabelSS6 = GUICtrlCreateLabel("06", 8, 128, 16, 17) $LabelSS7 = GUICtrlCreateLabel("07", 8, 152, 16, 17) $LabelSS8 = GUICtrlCreateLabel("08", 8, 176, 16, 17) $LabelSS9 = GUICtrlCreateLabel("09", 8, 200, 16, 17) $LabelSS10 = GUICtrlCreateLabel("10", 8, 224, 16, 17) $LabelSS11 = GUICtrlCreateLabel("11", 8, 248, 16, 17) $LabelSS12 = GUICtrlCreateLabel("12", 8, 272, 16, 17) $LabelSS13 = GUICtrlCreateLabel("13", 8, 296, 16, 17) $InputSS1 = GUICtrlCreateInput("", 32, 8, 121, 21) $InputSS2 = GUICtrlCreateInput("", 32, 32, 121, 21) $InputSS3 = GUICtrlCreateInput("", 32, 56, 121, 21) $InputSS4 = GUICtrlCreateInput("", 32, 80, 121, 21) $InputSS5 = GUICtrlCreateInput("", 32, 104, 121, 21) $InputSS6 = GUICtrlCreateInput("", 32, 128, 121, 21) $InputSS7 = GUICtrlCreateInput("", 32, 152, 121, 21) $InputSS8 = GUICtrlCreateInput("", 32, 176, 121, 21) $InputSS9 = GUICtrlCreateInput("", 32, 200, 121, 21) $InputSS10 = GUICtrlCreateInput("", 32, 224, 121, 21) $InputSS11 = GUICtrlCreateInput("", 32, 248, 121, 21) $InputSS12 = GUICtrlCreateInput("", 32, 272, 121, 21) $InputSS13 = GUICtrlCreateInput("", 32, 296, 121, 21) $ButtonSS1 = GUICtrlCreateButton("Save", 32, 320, 123, 17) $ButtonSS2 = GUICtrlCreateButton("X", 160, 8, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Delete") $ButtonSS3 = GUICtrlCreateButton("X", 160, 32, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS4 = GUICtrlCreateButton("X", 160, 56, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS5 = GUICtrlCreateButton("X", 160, 80, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS6 = GUICtrlCreateButton("X", 160, 104, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS7 = GUICtrlCreateButton("X", 160, 128, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS8 = GUICtrlCreateButton("X", 160, 152, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS9 = GUICtrlCreateButton("X", 160, 176, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS10 = GUICtrlCreateButton("X", 160, 200, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS11 = GUICtrlCreateButton("X", 160, 224, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS12 = GUICtrlCreateButton("X", 160, 248, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS13 = GUICtrlCreateButton("X", 160, 272, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonSS14 = GUICtrlCreateButton("X", 160, 296, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUISwitch($Form1) $FormNSUBS = GUICreate("Primary Sub's", 188, 347, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, "FormNSUBS") $LabelS1 = GUICtrlCreateLabel("01", 8, 8, 16, 17) $LabelNS2 = GUICtrlCreateLabel("02", 8, 32, 16, 17) $LabelNS3 = GUICtrlCreateLabel("03", 8, 56, 16, 17) $LabelNS4 = GUICtrlCreateLabel("04", 8, 80, 16, 17) $LabelNS5 = GUICtrlCreateLabel("05", 8, 104, 16, 17) $LabelNS6 = GUICtrlCreateLabel("06", 8, 128, 16, 17) $LabelNS7 = GUICtrlCreateLabel("07", 8, 152, 16, 17) $LabelNS8 = GUICtrlCreateLabel("08", 8, 176, 16, 17) $LabelNS9 = GUICtrlCreateLabel("09", 8, 200, 16, 17) $LabelNS10 = GUICtrlCreateLabel("10", 8, 224, 16, 17) $LabelNS11 = GUICtrlCreateLabel("11", 8, 248, 16, 17) $LabelNS12 = GUICtrlCreateLabel("12", 8, 272, 16, 17) $LabelNS13 = GUICtrlCreateLabel("13", 8, 296, 16, 17) $InputNS1 = GUICtrlCreateInput("", 32, 8, 121, 21) $InputNS2 = GUICtrlCreateInput("", 32, 32, 121, 21) $InputNS3 = GUICtrlCreateInput("", 32, 56, 121, 21) $InputNS4 = GUICtrlCreateInput("", 32, 80, 121, 21) $InputNS5 = GUICtrlCreateInput("", 32, 104, 121, 21) $InputNS6 = GUICtrlCreateInput("", 32, 128, 121, 21) $InputNS7 = GUICtrlCreateInput("", 32, 152, 121, 21) $InputNS8 = GUICtrlCreateInput("", 32, 176, 121, 21) $InputNS9 = GUICtrlCreateInput("", 32, 200, 121, 21) $InputNS10 = GUICtrlCreateInput("", 32, 224, 121, 21) $InputNS11 = GUICtrlCreateInput("", 32, 248, 121, 21) $InputNS12 = GUICtrlCreateInput("", 32, 272, 121, 21) $InputNS13 = GUICtrlCreateInput("", 32, 296, 121, 21) $ButtonNS1 = GUICtrlCreateButton("Save", 32, 320, 123, 17) $ButtonNS2 = GUICtrlCreateButton("X", 160, 8, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Delete") $ButtonNS3 = GUICtrlCreateButton("X", 160, 32, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS4 = GUICtrlCreateButton("X", 160, 56, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS5 = GUICtrlCreateButton("X", 160, 80, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS6 = GUICtrlCreateButton("X", 160, 104, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS7 = GUICtrlCreateButton("X", 160, 128, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS8 = GUICtrlCreateButton("X", 160, 152, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS9 = GUICtrlCreateButton("X", 160, 176, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS10 = GUICtrlCreateButton("X", 160, 200, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS11 = GUICtrlCreateButton("X", 160, 224, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS12 = GUICtrlCreateButton("X", 160, 248, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS13 = GUICtrlCreateButton("X", 160, 272, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ButtonNS14 = GUICtrlCreateButton("X", 160, 296, 19, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUISwitch($Form1) #endregion ### END Koda GUI section ### While 1 WEnd Func MenuItem1Click() MsgBox(1, "1", "1") EndFunc ;==>MenuItem1Click Func _1Close() Exit EndFunc ;==>_1Close Func FormCert() GUISetState(@SW_HIDE, $FormCert) EndFunc ;==>FormCert Func FormCert1() GUISetState(@SW_HIDE, $FormCert1) EndFunc ;==>FormCert1 Func FormC1() GUISetState(@SW_SHOW, $FormSSUBS) EndFunc ;==>FormC1 Func FormCview() GUISetState(@SW_SHOW, $FormCert1) EndFunc ;==>FormCview Func FormPsView() GUISetState(@SW_SHOW, $FormPSubs) EndFunc ;==>FormPsView Func FormPSubs() GUISetState(@SW_HIDE, $FormPSubs) EndFunc ;==>FormPSubs Func FormSSUBS() GUISetState(@SW_HIDE, $FormSSUBS) EndFunc ;==>FormSSUBS Func FormNSUBS() GUISetState(@SW_HIDE, $FormNSUBS) EndFunc ;==>FormNSUBS Func FormSS1() GUISetState(@SW_SHOW, $FormCert1) EndFunc ;==>FormSS1 Func FormNview() GUISetState(@SW_SHOW, $FormNSUBS) EndFunc ;==>FormNview Func ButtonBrowse() $Open = FileOpenDialog("Choose A picture", @MyDocumentsDir, "Images (*.jpg;*.bmp)") If $Open = @error = 0 Then MsgBox(0, "Error", "No Profile Picture has been Chosen!") Else If $Open = @error = 1 Then GUICtrlSetImage($Pic2, $Open) DirCreate(@ProgramFilesDir & "Student Database\Student Info\Student Pic") $Open1 = GUICtrlRead($Input1, 0) FileCopy($Open, @ProgramFilesDir & "--Student Database\Student Info\Student Pic\" & $Open1 & ".jpg", 8) EndIf EndIf EndFunc ;==>ButtonBrowse Func OpenFile() $D1 = FileOpenDialog("Choose A Student File", @ProgramFilesDir & "--Student Database\Student Info\IniFile\", "Inifiles (*.ini)", 1) $r1 = IniRead($D1, "Student Info", "Student Number:", "") $r2 = IniRead($D1, "Student Info", "First Name:", "") $r3 = IniRead($D1, "Student Info", "Middle Name:", "") $r4 = IniRead($D1, "Student Info", "Surname:", "") $r5 = IniRead($D1, "Student Info", "ID Number:", "") $r6 = IniRead($D1, "Student Info", "Age:", "") $r7 = IniRead($D1, "Student Info", "Gender:", "") $r8 = IniRead($D1, "Student Info", "Course Attending:", "") $r9 = IniRead($D1, "Student Info", "Year:", "") $r10 = IniRead($D1, "Student Info", "Block:", "") GUICtrlSetData($Input1, $r1) GUICtrlSetData($Input2, $r2) GUICtrlSetData($Input3, $r3) GUICtrlSetData($Input4, $r4) GUICtrlSetData($Input5, $r5) GUICtrlSetData($Input6, $r6) GUICtrlSetData($Combo1, $r7) GUICtrlSetData($Input7, $r8) GUICtrlSetData($Input8, $r9) GUICtrlSetData($Input9, $r10) EndFunc ;==>OpenFile Func SaveFile() $Lab1 = GUICtrlRead($Label1, 0) $Inp1 = GUICtrlRead($Input1, 0) IniWrite(@ProgramFilesDir & "Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab1, $Inp1) ; HERES THE LINE OF CODE I TESTED IT WITH. $Lab2 = GUICtrlRead($Label2, 0) $Inp2 = GUICtrlRead($Input2, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab2, $Inp2) $Lab3 = GUICtrlRead($Label3, 0) $Inp3 = GUICtrlRead($Input3, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab3, $Inp3) $Lab4 = GUICtrlRead($Label4, 0) $Inp4 = GUICtrlRead($Input4, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab4, $Inp4) $Lab5 = GUICtrlRead($Label5, 0) $Inp5 = GUICtrlRead($Input5, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab5, $Inp5) $Lab6 = GUICtrlRead($Label6, 0) $Inp6 = GUICtrlRead($Input6, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab6, $Inp6) $Lab7 = GUICtrlRead($Label7, 0) $Inp7 = _GUICtrlComboBox_GetEditText($Combo1) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Student Info", $Lab7, $Inp7) $Lab8 = GUICtrlRead($Label8, 0) $Inp8 = GUICtrlRead($Input7, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab8, $Inp8) $Lab9 = GUICtrlRead($Label9, 0) $Inp9 = GUICtrlRead($Input8, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab9, $Inp9) $Lab10 = GUICtrlRead($Label10, 0) $Inp10 = GUICtrlRead($Input9, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab10, $Inp10) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Student Info", $Lab10, $Inp10) Local $oExcel = _ExcelBookNew(0) _ExcelPictureInsert($oExcel, "C:\Users\Chris\Desktop\Project Mogolo\Pictures\Mogolo Label.jpg", 0, 0, 380, 100, True, True) _ExcelPictureInsert($oExcel, "C:\Users\Chris\Desktop\Project Mogolo\Pictures\Face.jpg", 310, 120,60, 60, True, True) _ExcelWriteCell($oExcel, "Student Information Report", 10, 4) _ExcelWriteCell($oExcel, $Lab1, 13, 1) _ExcelWriteCell($oExcel, $Inp1, 13, 7) _ExcelWriteCell($oExcel, $Lab2, 14, 1) _ExcelWriteCell($oExcel, $Inp2, 14, 7) _ExcelWriteCell($oExcel, $Lab3, 15, 1) _ExcelWriteCell($oExcel, $Inp3, 15, 7) _ExcelWriteCell($oExcel, $Lab4, 16, 1) _ExcelWriteCell($oExcel, $Inp4, 16, 7) _ExcelWriteCell($oExcel, $Lab5, 17, 1) _ExcelWriteCell($oExcel, $Inp5, 17, 7) ;Bug 1 tbs ; numerical chars written in formula if longer than 12 chars _ExcelWriteCell($oExcel, $Lab6, 18, 1) _ExcelWriteCell($oExcel, $Inp6, 18, 7) _ExcelWriteCell($oExcel, $Lab7, 19, 1) _ExcelWriteCell($oExcel, $Inp7, 19, 7) _ExcelWriteCell($oExcel, $Lab8, 20, 1) _ExcelWriteCell($oExcel, $Inp8, 20, 7) _ExcelWriteCell($oExcel, $Lab9, 21, 1) _ExcelWriteCell($oExcel, $Inp9, 21, 7) _ExcelWriteCell($oExcel, $Lab10, 22, 1) _ExcelWriteCell($oExcel, $Inp10, 22, 7) ; And finally we close out ;~ -------------------------------------------------------------------------------------- $Lab11 = GUICtrlRead($Label11, 0) $Inp11 = GUICtrlRead($Date1, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab11, $Inp11) $Lab12 = GUICtrlRead($Label12, 0) $Inp12 = GUICtrlRead($Input10, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab12, $Inp12) $Lab13 = GUICtrlRead($Label13, 0) $Inp13 = GUICtrlRead($Input11, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab13, $Inp13) $Lab14 = GUICtrlRead($Label14, 0) $Inp14 = GUICtrlRead($Input12, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab14, $Inp14) $Lab15 = GUICtrlRead($Label15, 0) $Inp15 = GUICtrlRead($Input13, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab15, $Inp15) $Lab16 = GUICtrlRead($Label16, 0) $Inp16 = GUICtrlRead($Input14, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab16, $Inp16) $Lab17 = GUICtrlRead($Label17, 0) $Inp17 = GUICtrlRead($Input15, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab17, $Inp17) $Lab18 = GUICtrlRead($Label18, 0) $Inp18 = GUICtrlRead($Input16, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab18, $Inp18) $Lab19 = GUICtrlRead($Label19, 0) $Inp19 = GUICtrlRead($Input17, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab19, $Inp19) $Lab20 = GUICtrlRead($Label20, 0) $Inp20 = GUICtrlRead($Input18, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab20, $Inp20) $Lab21 = GUICtrlRead($Label21, 0) $Inp21 = GUICtrlRead($Input19, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab21, $Inp21) $Lab22 = GUICtrlRead($Label22, 0) $Inp22 = GUICtrlRead($Input20, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab22, $Inp22) $Lab23 = GUICtrlRead($Label23, 0) $Inp23 = GUICtrlRead($Input21, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab23, $Inp23) $Lab24 = GUICtrlRead($Label24, 0) $Inp24 = GUICtrlRead($Input22, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab24, $Inp24) $Lab25 = GUICtrlRead($Label25, 0) $Inp25 = GUICtrlRead($Input23, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab25, $Inp25) $Lab26 = GUICtrlRead($Label26, 0) $Inp26 = GUICtrlRead($Input24, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab26, $Inp26) $Lab27 = GUICtrlRead($Label27, 0) $Inp27 = GUICtrlRead($Input25, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Course Info", $Lab27, $Inp27) _ExcelWriteCell($oExcel, "Course Information", 25, 1) _ExcelWriteCell($oExcel, $Lab11, 26, 1) _ExcelWriteCell($oExcel, $Inp11, 26, 7) _ExcelWriteCell($oExcel, $Lab12, 27, 1) _ExcelWriteCell($oExcel, $Inp12, 27, 7) _ExcelWriteCell($oExcel, $Lab13, 28, 1) _ExcelWriteCell($oExcel, $Inp13, 28, 7) _ExcelWriteCell($oExcel, $Lab14, 29, 1) _ExcelWriteCell($oExcel, $Inp14, 29, 7) _ExcelWriteCell($oExcel, $Lab15, 30, 1) _ExcelWriteCell($oExcel, $Inp15, 30, 7) _ExcelWriteCell($oExcel, $Lab16, 31, 1) _ExcelWriteCell($oExcel, $Inp16, 31, 7) _ExcelWriteCell($oExcel, $Lab17, 32, 1) _ExcelWriteCell($oExcel, $Inp17, 32, 7) _ExcelWriteCell($oExcel, $Lab18, 33, 1) _ExcelWriteCell($oExcel, $Inp18, 33, 7) _ExcelWriteCell($oExcel, $Lab19, 34, 1) _ExcelWriteCell($oExcel, $Inp19, 34, 7) _ExcelWriteCell($oExcel, $Lab20, 35, 1) _ExcelWriteCell($oExcel, $Inp20, 35, 7) _ExcelWriteCell($oExcel, $Lab21, 36, 1) _ExcelWriteCell($oExcel, $Inp21, 36, 7) _ExcelWriteCell($oExcel, $Lab22, 37, 1) _ExcelWriteCell($oExcel, $Inp22, 37, 7) _ExcelWriteCell($oExcel, $Lab23, 38, 1) _ExcelWriteCell($oExcel, $Inp23, 38, 7) _ExcelWriteCell($oExcel, $Lab24, 39, 1) _ExcelWriteCell($oExcel, $Inp24, 39, 7) _ExcelWriteCell($oExcel, $Lab25, 40, 1) _ExcelWriteCell($oExcel, $Inp25, 40, 7) _ExcelWriteCell($oExcel, $Lab26, 41, 1) _ExcelWriteCell($oExcel, $Inp26, 41, 7) _ExcelWriteCell($oExcel, $Lab27, 42, 1) _ExcelWriteCell($oExcel, $Inp27, 42, 7) ;~ ---------------------------------------------------------------------------------------------- $Lab28 = GUICtrlRead($Label28, 0) $Inp28 = GUICtrlRead($Input26, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab28, $Inp28) $Lab29 = GUICtrlRead($Label29, 0) $Inp29 = GUICtrlRead($Input27, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab29, $Inp29) $Lab30 = GUICtrlRead($Label30, 0) $Inp30 = GUICtrlRead($Input28, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab30, $Inp30) $Lab31 = GUICtrlRead($Label31, 0) $Inp31 = _GUICtrlComboBox_GetEditText($Combo2) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Personal Details", $Lab31, $Inp31) $Lab32 = GUICtrlRead($Label32, 0) $Inp32 = GUICtrlRead($Input29, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab32, $Inp32) $Lab33 = GUICtrlRead($Label33, 0) $Inp33 = GUICtrlRead($Input30, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab33, $Inp33) $Lab34 = GUICtrlRead($Label34, 0) $Inp34 = GUICtrlRead($Date2, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab34, $Inp34) $Lab35 = GUICtrlRead($Label35, 0) $Inp35 = GUICtrlRead($Edit1, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab35, $Inp35) $Lab36 = GUICtrlRead($Label36, 0) $Inp36 = GUICtrlRead($Input31, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab36, $Inp36) $Lab37 = GUICtrlRead($Label37, 0) $Inp37 = GUICtrlRead($Input32, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab37, $Inp37) $Lab38 = GUICtrlRead($Label38, 0) $Inp38 = GUICtrlRead($Input33, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Personal Details", $Lab38, $Inp38) _ExcelWriteCell($oExcel, "Personal Details", 45, 1) _ExcelWriteCell($oExcel, $Lab28, 46, 1) _ExcelWriteCell($oExcel, $Inp28, 46, 7) _ExcelWriteCell($oExcel, $Lab29, 47, 1) _ExcelWriteCell($oExcel, $Inp29, 47, 7) _ExcelWriteCell($oExcel, $Lab30, 48, 1) _ExcelWriteCell($oExcel, $Inp30, 48, 7) _ExcelWriteCell($oExcel, $Lab31, 49, 1) _ExcelWriteCell($oExcel, $Inp31, 49, 7) _ExcelWriteCell($oExcel, $Lab32, 50, 1) _ExcelWriteCell($oExcel, $Inp32, 50, 7) _ExcelWriteCell($oExcel, $Lab33, 51, 1) _ExcelWriteCell($oExcel, $Inp33, 51, 7) _ExcelWriteCell($oExcel, $Lab34, 52, 1) _ExcelWriteCell($oExcel, $Inp34, 52, 7) _ExcelWriteCell($oExcel, $Lab35, 53, 1) _ExcelWriteCell($oExcel, $Inp35, 53, 7) _ExcelWriteCell($oExcel, $Lab36, 54, 1) _ExcelWriteCell($oExcel, $Inp36, 54, 7) _ExcelWriteCell($oExcel, $Lab37, 55, 1) _ExcelWriteCell($oExcel, $Inp37, 55, 7) _ExcelWriteCell($oExcel, $Lab38, 56, 1) _ExcelWriteCell($oExcel, $Inp38, 56, 7) ;~ --------------------------------------------------------------------------------------------------------------- $Lab39 = GUICtrlRead($Label39, 0) $Inp39 = GUICtrlRead($Input34, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Contact Details", $Lab39, $Inp39) $Lab40 = GUICtrlRead($Label40, 0) $Inp40 = GUICtrlRead($Input35, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Contact Details", $Lab40, $Inp40) $Lab41 = GUICtrlRead($Label41, 0) $Inp41 = GUICtrlRead($Input36, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Contact Details", $Lab41, $Inp41) $Lab42 = GUICtrlRead($Label42, 0) $Inp42 = GUICtrlRead($Input37, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Contact Details", $Lab42, $Inp42) $Lab43 = GUICtrlRead($Label43, 0) $Inp43 = GUICtrlRead($Input38, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Contact Details", $Lab43, $Inp43) $Lab44 = GUICtrlRead($Label44, 0) $Inp44 = GUICtrlRead($Edit2, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Contact Details", $Lab44, $Inp44) _ExcelWriteCell($oExcel, "Contact Details", 59, 1) _ExcelWriteCell($oExcel, $Lab39, 60, 1) _ExcelWriteCell($oExcel, $Inp39, 60, 7) _ExcelWriteCell($oExcel, $Lab40, 61, 1) _ExcelWriteCell($oExcel, $Inp40, 61, 7) _ExcelWriteCell($oExcel, $Lab41, 62, 1) _ExcelWriteCell($oExcel, $Inp41, 62, 7) _ExcelWriteCell($oExcel, $Lab42, 63, 1) _ExcelWriteCell($oExcel, $Inp42, 63, 7) _ExcelWriteCell($oExcel, $Lab43, 64, 1) _ExcelWriteCell($oExcel, $Inp43, 64, 7) _ExcelWriteCell($oExcel, $Lab44, 65, 1) _ExcelWriteCell($oExcel, $Inp44, 65, 7) ;~ ------------------------------------------------------------------------------------------------ $Lab45 = GUICtrlRead($Label45, 0) $Inp45 = _GUICtrlComboBox_GetEditText($Radio2) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Employement Details", $Lab45, $Inp45) $Lab46 = GUICtrlRead($Label46, 0) $Inp46 = GUICtrlRead($Input39, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Employement Details", $Lab46, $Inp46) $Lab47 = GUICtrlRead($Label47, 0) $Inp47 = GUICtrlRead($Input40, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Employement Details", $Lab47, $Inp47) $Lab48 = GUICtrlRead($Label48, 0) $Inp48 = GUICtrlRead($Input41, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Employement Details", $Lab48, $Inp48) $Lab49 = GUICtrlRead($Label49, 0) $Inp49 = GUICtrlRead($Input42, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Employement Details", $Lab49, $Inp49) $Lab50 = GUICtrlRead($Label50, 0) $Inp50 = _GUICtrlComboBox_GetEditText($Combo4) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Employement Details", $Lab50, $Inp50) _ExcelWriteCell($oExcel, "Contact Details", 68, 1) _ExcelWriteCell($oExcel, $Lab45, 69, 1) _ExcelWriteCell($oExcel, $Inp45, 69, 7) _ExcelWriteCell($oExcel, $Lab46, 70, 1) _ExcelWriteCell($oExcel, $Inp46, 70, 7) _ExcelWriteCell($oExcel, $Lab47, 71, 1) _ExcelWriteCell($oExcel, $Inp47, 71, 7) _ExcelWriteCell($oExcel, $Lab48, 72, 1) _ExcelWriteCell($oExcel, $Inp48, 72, 7) _ExcelWriteCell($oExcel, $Lab49, 73, 1) _ExcelWriteCell($oExcel, $Inp49, 73, 7) _ExcelWriteCell($oExcel, $Lab50, 74, 1) _ExcelWriteCell($oExcel, $Inp50, 74, 7) ;~ ------------------------------------------------------------------------------------- #cs $Lab50 = GUICtrlRead($Label50, 0) $Inp50 = GUICtrlRead($Input43, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Emergency Contact Details", $Lab50, $Inp50) $Lab51 = GUICtrlRead($Label51, 0) $Inp51 = GUICtrlRead($Input44, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Emergency Contact Details", $Lab51, $Inp51) $Lab52 = GUICtrlRead($Label52, 0) $Inp52 = GUICtrlRead($Input45, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Emergency Contact Details", $Lab52, $Inp52) $Lab53 = GUICtrlRead($Label54, 0) $Inp53 = GUICtrlRead($Input46, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Emergency Contact Details", $Lab53, $Inp53) $Lab54 = GUICtrlRead($Label55, 0) $Inp54 = GUICtrlRead($Input47, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Emergency Contact Details", $Lab54, $Inp54) $Lab55 = GUICtrlRead($Group18, 0) $Inp55 = _GUICtrlComboBox_GetEditText($Combo4) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Emergency Contact Details", $Lab55, $Inp55) _ExcelWriteCell($oExcel, "Emergency Contact Details", 77, 1) _ExcelWriteCell($oExcel, $Lab50, 78, 1) _ExcelWriteCell($oExcel, $Inp50, 78, 7) _ExcelWriteCell($oExcel, $Lab51, 79, 1) _ExcelWriteCell($oExcel, $Inp51, 79, 7) _ExcelWriteCell($oExcel, $Lab52, 80, 1) _ExcelWriteCell($oExcel, $Inp52, 80, 7) _ExcelWriteCell($oExcel, $Lab53, 81, 1) _ExcelWriteCell($oExcel, $Inp53, 81, 7) _ExcelWriteCell($oExcel, $Lab54, 82, 1) _ExcelWriteCell($oExcel, $Inp54, 82, 7) _ExcelWriteCell($oExcel, $Lab55, 83, 1) _ExcelWriteCell($oExcel, $Inp55, 83, 7) ;~ -------------------------------------------------------------------------------------- $Lab57 = GUICtrlRead($Label57, 0) $Inp57 = GUICtrlRead($Input48, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Guardian Contact Details", $Lab58, $Inp58) $Lab57 = GUICtrlRead($Label58, 0) $Inp58 = GUICtrlRead($Input49, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Guardian Contact Details", $Lab59, $Inp59) $Lab59 = GUICtrlRead($Label59, 0) $Inp59 = GUICtrlRead($Input50, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Guardian Contact Details", $Lab60, $Inp60) $Lab60 = GUICtrlRead($Label60, 0) $Inp60 = GUICtrlRead($Input51, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Guardian Contact Details", $Lab61, $Inp61) $Lab6 = GUICtrlRead($Label61, 0) $Inp62 = GUICtrlRead($Input52, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\Inifile\" & $Inp1 & ".ini", "Guardian Contact Details", $Lab62, $Inp62) $Lab63 = GUICtrlRead($Label62, 0) $Inp63 = GUICtrlRead($EDIT3, 0) IniWrite(@ProgramFilesDir & "--Student Database\Student Info\IniFile\" & $Inp1 & ".ini", "Guardian Contact Details", $Lab63, $Inp63) _ExcelWriteCell($oExcel, "Emergency Contact Details", 77, 1) _ExcelWriteCell($oExcel, $Lab58, 78, 1) _ExcelWriteCell($oExcel, $Inp58, 78, 7) _ExcelWriteCell($oExcel, $Lab59, 79, 1) _ExcelWriteCell($oExcel, $Inp59, 79, 7) _ExcelWriteCell($oExcel, $Lab60, 80, 1) _ExcelWriteCell($oExcel, $Inp60, 80, 7) _ExcelWriteCell($oExcel, $Lab61, 81, 1) _ExcelWriteCell($oExcel, $Inp61, 81, 7) _ExcelWriteCell($oExcel, $Lab62, 82, 1) _ExcelWriteCell($oExcel, $Inp62, 82, 7) _ExcelWriteCell($oExcel, $Lab63, 83, 1) _ExcelWriteCell($oExcel, $Inp63, 83, 7) #ce _ExcelBookSaveAs($oExcel, @ProgramFilesDir & "--Student Database\Student Info\Inifile\ " & $Inp1 & ".Xls", "xls", 0, 1) _ExcelBookClose($oExcel) EndFunc ;==>SaveFile Func PrintStudentFile() $read = GUICtrlRead($Input1, 0) _FilePrint(@ProgramFilesDir & "--Student Database\Student Info\Inifile\ " & $read & ".Xls") EndFunc ;==>PrintStudentFile Func Rad2() EndFunc ;==>Rad2 Func Rad1() EndFunc ;==>Rad1 Edited March 14, 2012 by ac1dm4nner [u]My dream is to have a dream...[/u] Link to comment Share on other sites More sharing options...
acidman Posted March 14, 2012 Author Share Posted March 14, 2012 Ah never mind "I make such incomplicated mistakes" Thanks anyhow m8. [u]My dream is to have a dream...[/u] 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