$status = sqlite("sql",$_SqlGrid, "sqlget=0") while not($_sqleol) $data = sqlget("code") + sqlget("name") + sqlget("userdata") sqlnext Endwhile |
GoTo Position=Top While not($_Eol) $data = $d_code + $d_name + $d_userdata GoTo position=Next EndWhile GoTo position=Top |
$Status = sqlite("sql","select * from caches limit 5","sqlget=0") While not($_SqlEol0) $code = SqlGet("Code") $data = $Code + ": " + SqlGet("Name",0) + $_CrLf $Status = sqlite("sql","select * from logs where lparent = '$code' limit 5","sqlget=yes1") While not($_SqlEol1) $data = $data + " " + SqlGet("lby",1) + ": " + SqlGet("ldate",1) + $_CrLf SqlNext Handle=1 Endwhile SqlGetClose Handle=1 MsgOk Msg=$data SqlNext Handle=0 EndWhile SqlGetClose Handle=0 |
$Status = sqlite("sql","select * from caches limit 5","sqlget=0") While not($_SqlEol) $code = SqlGet("Code") $data = $Code + ": " + SqlGet("Name") + $_CrLf $Status = sqlite("sql","select * from logs where lparent = '$code' limit 5","sqlget=yes1") While not($_SqlEol1) $data = $data + " " + SqlGet("lby",1) + ": " + SqlGet("ldate",1) + $_CrLf SqlNext Handle=1 Endwhile SqlGetClose Handle=1 MsgOk Msg=$data SqlNext EndWhile SqlGetClose |