% sName = request.Cookies("user")("user_id") 'iUserID = request.Cookies("user")("userID") iRole = request.Cookies("user")("role") Dim sConnectionString sConnectionString = _ "DRIVER={MySQL ODBC 3.51 Driver};" &_ "SERVER=localhost;" &_ "DATABASE=sfd;" &_ "USER=root; PASSWORD=;" &_ "OPTION=3;" %>
<% if request.Cookies("user")("role") = 1 then %>
Administrator Page
<% end if %>
<% if len(request.Cookies("user")("user_ID")) > 0 then %>
Hello <%=sName%>, Log Out
<% else %>
Register as member <%=sDate%>
<% end if %>
|