Value :=GetSQLStringData('select name from opduser where loginname= "'+GetSQLStringData('select kskloginname from onlineuser '+
    ' where onlineid ="'+GetOnlineID+'"  ')+'" ');