<% Dim objConn Set objConn = Server.CreateObject("ADODB.Connection") %> <% objConn.Open %>

<% if Session("Username") <> "" then %> Hi <%= Session("Username") %>,
Go Backstage <% else %>
Login - Register
<% end if %>

BACKSTAGE

UNDERdog.be

Featured Games

<% mySQL="SELECT NAME,URL,GENRE,IMAGE, DESCRIPTION from udb_UDGAMES WHERE GENRE <> '1' ORDER BY mDATE DESC LIMIT 0,4" set objRS=objConn.execute(mySQL) do until objRS.eof msgName=objRS(0) msgUrl=objRS(1) msgGenre=objRS(2) msgImage=objRS(3) msgDescription=objRS(4) %>

<% =msgName %>

<% =msgDescription %>

<% =msgGenre %>

<% objRS.movenext loop %>

UNDERdog.be on Facebook

News

<% myID="NEWS" mySQL="SELECT TITLE,ARTICLE,URL,MDATE,ID from udb_UDARTICLES WHERE CATEGORY='"& myID &"' ORDER BY MDATE DESC LIMIT 0,3" set objRS=objConn.execute(mySQL) do until objRS.eof msgTitle=objRS(0) msgArticle=objRS(1) msgArticleSplit = Split(msgArticle, "---") msgUrl=objRS(2) msgDate=objRS(3) msgID=objRS(4) %>

<%=msgTitle %>

<%=msgDate%>

<%=msgArticleSplit(0) %> Add To Social Stuff

<% objRS.movenext loop %> Read All News

Backstage

<% myID="BACKSTAGE" mySQL="SELECT TITLE,ARTICLE,URL,MDATE,ID from udb_UDARTICLES WHERE CATEGORY='"& myID &"' ORDER BY MDATE DESC LIMIT 0,3" set objRS=objConn.execute(mySQL) do until objRS.eof msgTitle=objRS(0) msgArticle=objRS(1) msgArticleSplit = Split(msgArticle, "---") msgUrl=objRS(2) msgDate=objRS(3) msgID=objRS(4) %>

<%=msgTitle %>

<%=msgDate%>

<%=msgArticleSplit(0) %>

<% objRS.movenext loop %> Go Backstage

More Games

<% mySQL="SELECT NAME,URL,GENRE,IMAGE,W,H from udb_UDGAMES WHERE GENRE <> '1' ORDER BY mDATE DESC LIMIT 0,26" set objRS=objConn.execute(mySQL) do until objRS.eof msgName=objRS(0) msgUrl=objRS(1) msgGenre=objRS(2) msgImage=objRS(3) msgWidth=objRS(4) msgHeight=objRS(5) %>

<% =msgName %>

Sports

<% objRS.movenext loop %>

All Our Games

<% mySQL="SELECT NAME,URL,GENRE, STATUS from udb_UDGAMES WHERE GENRE <> '1' ORDER BY NAME ASC, mDATE DESC" set objRS=objConn.execute(mySQL) recordcounter = 0 do until objRS.eof msgName=objRS(0) msgUrl=objRS(1) msgGenre=objRS(2) msgStatus=objRS(3) %> <% if recordcounter >= 11 then %>

class="beta"<% end if %>><%=msgName %>

About Us

<% mySQL="SELECT ARTICLE from udb_UDARTICLES WHERE CATEGORY = 'ABOUT'" set objRS=objConn.execute(mySQL) do until objRS.eof msgText=objRS(0) %> <%=msgText%> <% objRS.movenext loop %>

Wim

Loves to make dreams come true... Enthusiasm is my middle name.

Jeroen

Knows never to trust Kens, especially the hado and shoryu kind.

Senne

Macman to the bone, addicted to music and loves his job.