david/d3k
david
/
d3k
0
0
Fork 0
Code Issues Pull Requests Releases 5 Wiki Activity

Update 'func.ahk'

This commit is contained in:
David Daily 2020-01-23 08:46:40 -06:00
parent 67dd119939
commit e6bd22263e
1 changed files with 17 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
func.ahk
View File

@ -30,14 +30,24 @@ GetInfo(xID) ; Accept what is passed here as the variable "xID" in the script
if (xID)
{
csv := FileOpen(A_MyDocuments "\Work_Docs\emails.csv", "r")
Loop {
if RegExMatch(csv.Read, xID)
{
Loop {
ReadLine := csv.ReadLine()
Array := StrSplit(ReadLine,",")
} Until InStr(Array[1], xID)
csv.Close()
Test := {xid: Array[1], email: Array[2], name: Array[3], user: Array[4], org: Array[5]} ; Return the array so we can do {variable}.email and so on
Return Test
} Else Return false
} Until InStr(Array[1], xID)
csv.Close()
Test := {xid: Array[1], email: Array[2], name: Array[3], user: Array[4], org: Array[5]} ; Return the array so we can do {variable}.email and so on
Return Test
} Else
{
Return Test.xid := "0"
}
}
if !(xID)
{
Return Test.xid := "0"
}
}
SetInfo(xID, column, value)
@ -68,7 +78,7 @@ SetInfo(xID, column, value)
{
tempcsv .= Dealinfo[k].xid . "," . Dealinfo[k].email . "," . Dealinfo[k].name . "," . Dealinfo[k].user . "," . Dealinfo[k].org
}
csv := A_MyDocuments . "\Work_Docs\emails-test.csv"
csv := A_MyDocuments . "\Work_Docs\emails.csv"
FileAppend, %tempcsv%, tempcsv
FileCopy, tempcsv, %csv%, 1
FileDelete, tempcsv