d3k/addemail.ahk

34 lines
760 B
AutoHotkey

#Include, func.ahk
csv = %A_MyDocuments%\Work_Docs\emails.csv ; Where the email CSV is
glovarini := A_MyDocuments "\GloVar.ini"
Xid := ini_get(glovarini, "Info", "xID")
Gui, +AlwaysOnTop +ToolWindow
Gui, Add, Text, x2 y2 w60 h17 +Center, xID
Gui, Add, Text, x65 y2 w120 h17 +Center, Email
Gui, Add, Text, x190 y2 w100 h17 +Center, Name
Gui, Add, Edit, x2 y17 w60 h20 vXid, %Xid%
Gui, Add, Edit, x65 y17 w120 h20 vEmail
Gui, Add, Edit, x190 y17 w100 h20 vName
Gui, Add, Button, x172 y89 w70 h30 Default, OK
Gui, Show, h39 w292, Add dealer to CSV
Return
ButtonOK:
Gui, Submit
writethis := Xid . "," . Email . "," . Name
FileAppend, % "`n" writethis, %csv%
ini_write(A_MyDocuments "\GloVar.ini", "dem", Email)
Return
GuiEscape:
GuiClose:
ExitApp