ocr: l SOLIVIEW-SpWhobuton-pushbution" à method pushbutton(uar eventinfo Event) var Sqistring String anstbl String enduar if isAssigned(TableSelected) then anstbl = ":PRIV:uSerlist" if strdbtype - "SYBASE" then SqiString - "sp_ who : executeseLTaDle(sgistring,strabnane,Imasrassword,anstbl) else enunusers(anstbl) endit if - tv.open(anstDl,WinstyleDerault,100,100,5500,4000) then SetTableViewattributes0) tv.setlitle("user List for : : + strdbname) tv.wait() tu.close() endif endif endMethod Edit Line: 23 Col: 5
