Jump to content

Windows 7 Directory create and Macros Not working!


Recommended Posts

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

  • Moderators

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 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

  • Moderators

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

#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 by ac1dm4nner

[u]My dream is to have a dream...[/u]

Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...