Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Script lines most recently executed (oldest first). Press [F5] to refresh. The seconds elapsed between a line and the one after it is in parentheses to the right (if not 0). The bottommost line's elapsed time is the number of seconds since it executed.
- 1176: this.Columns := columns
- 1177: }
- 1499: DllCall("SQLite3\sqlite3_free_table", "Ptr", mytable, "Cdecl")
- 1500: if (ErrorLevel)
- 1504: Return,tbl
- 1357: }
- 1359: }
- 1366: Return,ret
- 3239: columnCount := table.Columns.Count()
- 089: Return,this.SetCapacity(0)
- 3240: For each,row in table.Rows
- 3242: Loop,columnCount
- 3243: LV_Modify(RowNum,"Col2", row[A_Index])
- 1094: if (IsObject(param))
- 1097: if (!IsObjectMember(this, param))
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 044: Return,false
- 1098: if param is Integer
- 1100: if (this.ContainsIndex(param))
- 1118: Return,((index > 0) && (index <= this._fields.Count()))
- 089: Return,this.SetCapacity(0)
- 1101: Return,this._fields[param]
- 2450: Critical
- 2451: if !( psz )
- 2465: ct_hwnd := NumGet( lparam + 0, 0, pty )
- 2466: if ( ( ct_hwnd = Colored_LV_1 && which_lv := "1" ) || ( ct_hwnd = Colored_LV_2 && which_lv := "2" ) || ( ct_hwnd = Colored_LV_3 && which_lv := "3" ) || ( ct_hwnd = Colored_LV_4 && which_lv :=
- 2490: Code := -(~NumGet(lParam+0, 8))-1
- 2491: Return,Code = HDN_BEGINTRACKA || Code = HDN_BEGINTRACKW ? True : ""
- 3244: }
- 3245: SkillsList.MoveNext()
- 1855: this.ErrorMsg := ""
- 1856: this.ErrorCode := 0
- 1857: this._currentRow := 0
- 1858: if (!this._query)
- 1863: rc := DllCall("SQlite3\sqlite3_step", "UInt", this._query, "Cdecl Int")
- 1864: if (rc != this._db.ReturnCode("SQLITE_ROW"))
- 1536: Return,RCODE.HasKey(RC) ? RCODE[RC] : ""
- 1876: rc := DllCall("SQlite3\sqlite3_data_count", "UInt", this._query, "Cdecl Int")
- 1877: if (rc < 1)
- 1883: fields := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1884: Loop,%rc%
- 1885: ctype := DllCall("SQlite3\sqlite3_column_type", "UInt", this._query, "Int", A_Index - 1, "Cdecl Int")
- 1886: if (ctype == SQLITE_NULL)
- 1889: strPtr := DllCall("SQlite3\sqlite3_column_text", "UInt", this._query, "Int", A_Index - 1, "Cdecl UInt")
- 1890: fields[A_Index] := StrGet(strPtr, "UTF-8")
- 1891: }
- 1892: }
- 1893: this._currentRow := new DBA.Row(this._colNames, fields)
- 1085: this._columns := 0
- 1086: this._fields := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 000: }
- 1121: if (!is(columns, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1124: if (!is(fields, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1127: this._fields := fields
- 1128: this._columns := columns
- 1129: }
- 1894: this.CurrentRow++
- 1895: Return,true
- 3246: }
- 3233: While,(!SkillsList.EOF)
- 1284: if (IsObject(param))
- 1287: if (param = "EOF")
- 1288: Return,this.getEOF()
- 1850: Return,this._eof
- 3235: SkillListName := SkillsList["skill"]
- 1284: if (IsObject(param))
- 1287: if (param = "EOF")
- 1289: if (!IsObjectMember(this, param) && param != "_currentRow")
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 044: Return,false
- 1290: if (!is(this._currentRow, DBA.Row))
- 009: if (IsObject(type))
- 010: type := typeof(type)
- 020: if (IsObject(obj))
- 021: cls := obj.__Class
- 022: if (cls != "")
- 023: Return,cls
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 1094: if (IsObject(param))
- 1097: if (!IsObjectMember(this, param))
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 042: Return,true
- 1116: }
- 013: Return,true
- 1292: Return,this._currentRow[param]
- 1094: if (IsObject(param))
- 1097: if (!IsObjectMember(this, param))
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 044: Return,false
- 1098: if param is Integer
- 1103: index := 0
- 1104: For i,col in this._columns
- 1106: if (col = param)
- 1107: index := i
- 1108: Break
- 1111: if (this.ContainsIndex(index))
- 1118: Return,((index > 0) && (index <= this._fields.Count()))
- 089: Return,this.SetCapacity(0)
- 1112: Return,this._fields[index]
- 3236: LV_Add("", SkillListName)
- 2450: Critical
- 2451: if !( psz )
- 2465: ct_hwnd := NumGet( lparam + 0, 0, pty )
- 2466: if ( ( ct_hwnd = Colored_LV_1 && which_lv := "1" ) || ( ct_hwnd = Colored_LV_2 && which_lv := "2" ) || ( ct_hwnd = Colored_LV_3 && which_lv := "3" ) || ( ct_hwnd = Colored_LV_4 && which_lv :=
- 2490: Code := -(~NumGet(lParam+0, 8))-1
- 2491: Return,Code = HDN_BEGINTRACKA || Code = HDN_BEGINTRACKW ? True : ""
- 3237: RowNum := A_Index
- 3238: table := db.Query("SELECT COUNT(skill) FROM projects WHERE skill = '" . SkillListName . "' AND difficulty = 'Done'")
- 1352: ret := null
- 1353: if (RegExMatch(sql, "i)^\s*SELECT\s"))
- 1354: Try
- 1356: ret := this._GetTableObj(sql)
- 1437: err := 0, rc := 0, GetRows := 0
- 1438: i := 0
- 1439: rows := cols := 0
- 1440: names := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1441: dbh := this._handleDB
- 1442: SQLite_LastError(" ")
- 687: if (Error != "")
- 688: LastError := Error
- 689: Return,LastError
- 1443: if (!_SQLite_CheckDB(dbh))
- 740: DB += 0
- 741: if DB is not Integer
- 743: if (DB = 0)
- 745: if (Action = "Store")
- 749: if (Action = "Free")
- 754: Return,ValidHandles.HasKey(DB)
- 1448: if maxResult is not Integer
- 1450: if (maxResult < -1)
- 1452: mytable := ""
- 1453: err := 0
- 1454: _SQLite_StrToUTF8(SQL, UTF8)
- 719: VarSetCapacity(UTF8, StrPut(Str, "UTF-8"), 0)
- 720: Return,StrPut(Str, &UTF8, "UTF-8")
- 1455: rc := DllCall("SQlite3\sqlite3_get_table", "Ptr", dbh, "Ptr", &UTF8, "Ptr*", mytable, "Ptr*", rows, "Ptr*", cols, "Ptr*", err, "Cdecl Int")
- 1457: if (ErrorLevel)
- 1461: if (rc)
- 1467: if (maxResult = 0)
- 1475: if (maxResult = 1)
- 1477: if (maxResult > 1) && (maxResult < rows)
- 1480: GetRows := rows
- 1481: Offset := 0
- 1482: Loop,cols
- 1484: names.Add(StrGet(NumGet(mytable+0, Offset), "UTF-8"))
- 071: this.Insert(obj)
- 072: }
- 1485: Offset += A_PtrSize
- 1486: }
- 1487: myRows := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1488: Loop,%GetRows%
- 1489: i := A_Index
- 1490: fields := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1491: Loop,Cols
- 1493: fields.Add(StrGet(NumGet(mytable+0, Offset), "UTF-8"))
- 071: this.Insert(obj)
- 072: }
- 1494: Offset += A_PtrSize
- 1495: }
- 1496: myRows.Add(new DBA.Row(Names, fields))
- 1085: this._columns := 0
- 1086: this._fields := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 000: }
- 1121: if (!is(columns, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1124: if (!is(fields, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1127: this._fields := fields
- 1128: this._columns := columns
- 1129: }
- 071: this.Insert(obj)
- 072: }
- 1497: }
- 1498: tbl := new DBA.Table(myRows, Names)
- 1146: this.Rows := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1147: this.Columns := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 000: }
- 1169: if (!is(rows, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1172: if (!is(columns, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1175: this.Rows := rows
- 1176: this.Columns := columns
- 1177: }
- 1499: DllCall("SQLite3\sqlite3_free_table", "Ptr", mytable, "Cdecl")
- 1500: if (ErrorLevel)
- 1504: Return,tbl
- 1357: }
- 1359: }
- 1366: Return,ret
- 3239: columnCount := table.Columns.Count()
- 089: Return,this.SetCapacity(0)
- 3240: For each,row in table.Rows
- 3242: Loop,columnCount
- 3243: LV_Modify(RowNum,"Col2", row[A_Index])
- 1094: if (IsObject(param))
- 1097: if (!IsObjectMember(this, param))
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 044: Return,false
- 1098: if param is Integer
- 1100: if (this.ContainsIndex(param))
- 1118: Return,((index > 0) && (index <= this._fields.Count()))
- 089: Return,this.SetCapacity(0)
- 1101: Return,this._fields[param]
- 2450: Critical
- 2451: if !( psz )
- 2465: ct_hwnd := NumGet( lparam + 0, 0, pty )
- 2466: if ( ( ct_hwnd = Colored_LV_1 && which_lv := "1" ) || ( ct_hwnd = Colored_LV_2 && which_lv := "2" ) || ( ct_hwnd = Colored_LV_3 && which_lv := "3" ) || ( ct_hwnd = Colored_LV_4 && which_lv :=
- 2490: Code := -(~NumGet(lParam+0, 8))-1
- 2491: Return,Code = HDN_BEGINTRACKA || Code = HDN_BEGINTRACKW ? True : ""
- 3244: }
- 3245: SkillsList.MoveNext()
- 1855: this.ErrorMsg := ""
- 1856: this.ErrorCode := 0
- 1857: this._currentRow := 0
- 1858: if (!this._query)
- 1863: rc := DllCall("SQlite3\sqlite3_step", "UInt", this._query, "Cdecl Int")
- 1864: if (rc != this._db.ReturnCode("SQLITE_ROW"))
- 1536: Return,RCODE.HasKey(RC) ? RCODE[RC] : ""
- 1876: rc := DllCall("SQlite3\sqlite3_data_count", "UInt", this._query, "Cdecl Int")
- 1877: if (rc < 1)
- 1883: fields := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1884: Loop,%rc%
- 1885: ctype := DllCall("SQlite3\sqlite3_column_type", "UInt", this._query, "Int", A_Index - 1, "Cdecl Int")
- 1886: if (ctype == SQLITE_NULL)
- 1889: strPtr := DllCall("SQlite3\sqlite3_column_text", "UInt", this._query, "Int", A_Index - 1, "Cdecl UInt")
- 1890: fields[A_Index] := StrGet(strPtr, "UTF-8")
- 1891: }
- 1892: }
- 1893: this._currentRow := new DBA.Row(this._colNames, fields)
- 1085: this._columns := 0
- 1086: this._fields := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 000: }
- 1121: if (!is(columns, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1124: if (!is(fields, "Collection"))
- 009: if (IsObject(type))
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 013: Return,true
- 1127: this._fields := fields
- 1128: this._columns := columns
- 1129: }
- 1894: this.CurrentRow++
- 1895: Return,true
- 3246: }
- 3233: While,(!SkillsList.EOF)
- 1284: if (IsObject(param))
- 1287: if (param = "EOF")
- 1288: Return,this.getEOF()
- 1850: Return,this._eof
- 3235: SkillListName := SkillsList["skill"]
- 1284: if (IsObject(param))
- 1287: if (param = "EOF")
- 1289: if (!IsObjectMember(this, param) && param != "_currentRow")
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 044: Return,false
- 1290: if (!is(this._currentRow, DBA.Row))
- 009: if (IsObject(type))
- 010: type := typeof(type)
- 020: if (IsObject(obj))
- 021: cls := obj.__Class
- 022: if (cls != "")
- 023: Return,cls
- 011: While,(IsObject(obj))
- 012: if (obj.__Class == type)
- 1094: if (IsObject(param))
- 1097: if (!IsObjectMember(this, param))
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 042: Return,true
- 1116: }
- 013: Return,true
- 1292: Return,this._currentRow[param]
- 1094: if (IsObject(param))
- 1097: if (!IsObjectMember(this, param))
- 035: if (IsObject(obj))
- 036: Return,ObjHasKey(obj, memberStr) || IsMetaProperty(memberStr)
- 041: if str in %metaProps%
- 044: Return,false
- 1098: if param is Integer
- 1103: index := 0
- 1104: For i,col in this._columns
- 1106: if (col = param)
- 1107: index := i
- 1108: Break
- 1111: if (this.ContainsIndex(index))
- 1118: Return,((index > 0) && (index <= this._fields.Count()))
- 089: Return,this.SetCapacity(0)
- 1112: Return,this._fields[index]
- 3236: LV_Add("", SkillListName)
- 2450: Critical
- 2451: if !( psz )
- 2465: ct_hwnd := NumGet( lparam + 0, 0, pty )
- 2466: if ( ( ct_hwnd = Colored_LV_1 && which_lv := "1" ) || ( ct_hwnd = Colored_LV_2 && which_lv := "2" ) || ( ct_hwnd = Colored_LV_3 && which_lv := "3" ) || ( ct_hwnd = Colored_LV_4 && which_lv :=
- 2490: Code := -(~NumGet(lParam+0, 8))-1
- 2491: Return,Code = HDN_BEGINTRACKA || Code = HDN_BEGINTRACKW ? True : ""
- 3237: RowNum := A_Index
- 3238: table := db.Query("SELECT COUNT(skill) FROM projects WHERE skill = '" . SkillListName . "' AND difficulty = 'Done'")
- 1352: ret := null
- 1353: if (RegExMatch(sql, "i)^\s*SELECT\s"))
- 1354: Try
- 1356: ret := this._GetTableObj(sql)
- 1437: err := 0, rc := 0, GetRows := 0
- 1438: i := 0
- 1439: rows := cols := 0
- 1440: names := new Collection()
- 128: if (IsObject(enum))
- 131: }
- 1441: dbh := this._handleDB
- 1442: SQLite_LastError(" ")
- 687: if (Error != "")
- 688: LastError := Error
- 689: Return,LastError
- 1443: if (!_SQLite_CheckDB(dbh))
- 740: DB += 0
- 741: if DB is not Integer
- 743: if (DB = 0)
- 745: if (Action = "Store")
- 749: if (Action = "Free")
- 754: Return,ValidHandles.HasKey(DB)
- 1448: if maxResult is not Integer
- 1450: if (maxResult < -1)
- 1452: mytable := ""
- 1453: err := 0
- 1454: _SQLite_StrToUTF8(SQL, UTF8)
- 719: VarSetCapacity(UTF8, StrPut(Str, "UTF-8"), 0)
- 720: Return,StrPut(Str, &UTF8, "UTF-8")
- 1455: rc := DllCall("SQlite3\sqlite3_get_table", "Ptr", dbh, "Ptr", &UTF8, "Ptr*", mytable, "Ptr*", rows, "Ptr*", cols, "Ptr*", err, "Cdecl Int")
- 1457: if (ErrorLevel)
- 1461: if (rc)
- 1462: SQLite_LastError(StrGet(err, "UTF-8"))
- 687: if (Error != "")
- 688: LastError := Error
- 689: Return,LastError
- 1463: DllCall("SQLite3\sqlite3_free", "Ptr", err, "cdecl")
- 1464: ErrorLevel := rc
- 1465: Return,false
- 1357: }
- 1359: }
- 1366: Return,ret
- 3239: columnCount := table.Columns.Count()
- 064: ListLines
- Press [F5] to refresh.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement