<[ // WINC - Directory // (c) 1997-98 SmartDesk, Inc., All Rights Reserved FUNCTION chatUserCount( session, channel ) local s, cnt //println( "" + channel ) cnt = 0 s = sessionFindFirst( session.websrvr ) while ( s ) if ( ! sessionDataExpired( session.websrvr, sessionId( s ), "__chat_" + channel, 5 ) ) cnt++ // println( "cnt=" + cnt + ", channel=" + channel + ",s=" + s ) end s = sessionFindNext( s ) end return( cnt ) END // MAIN websrvr = 0 + param( 1 ) sessionId = 0 + param( 2 ) session = new( "session", websrvr, sessionId ) ini = new( "iniFile", fileFixPath( webServerHome( websrvr ) + "\\chat\\channels.dat" ) ) if ( type( ini ) != "O" ) session.error( "Unable to locate CHANNELS data file.", "FFFFFF", "000000" ) return( 0 ) end channel = 0 + session.var( "channel" ) if ( channel < 1 ) channel = 1 end cmd = session.var( "cmd" ) id = session.var( "id" ) alias = session.var( "alias" ) ]>

World-wide I-Net Chit-Chat (WINC) Lobby Events | User Logon | WebSuite | Home <[ data = ini.getitems( "channels" ) cnt = chrcount( ";", data ) + 1 for ( i=1; i<=cnt; i++ ) item = strextract( data, ";", i ) if ( strempty( item ) ) continue end line = ini.getstring( "channels", item, "" ) if ( strempty( line ) ) continue end ! "" end ]> CHANNEL " + item + " " + strextract( line, "|", 1 ) + " " + chatUserCount( session, item ) + " Events | User Logon | WebSuite | Home ©1997-98 SmartDesk, Inc., All Rights Reserved.

<[! webFooter( )]>