%@ language=JavaScript %>
<%
//these variable set the access needed for the page
var required_login = "false"; //'true' or 'false'
var required_status = "user"; //'user' or 'admin'
var asp_dir = "asp/"; //state where asp folder is in relation to this one
%>
PsionStyle - Wallpapers
/ Home
/ Wallpapers
<%
sql = "SELECT * from wallpaper_table ORDER BY wallpaper_author"
rs = Server.CreateObject("ADODB.RecordSet");
rs.Open (sql, Conn, 2,3);
if (rs.EOF){
Response.Write("No wallpapers found...come back soon.");
}
else{
wallpaper_array = new Array ();
i = 0;
while (! rs.EOF){
wallpaper_array[i] = new Object ();
wallpaper_array[i].name = String(rs.Fields.item("wallpaper_name"));
wallpaper_array[i].desc = String(rs.Fields.item("wallpaper_desc"));
wallpaper_array[i].author = String(rs.Fields.item("wallpaper_author"));
wallpaper_array[i].revo = String(rs.Fields.item("wallpaper_revo"));
wallpaper_array[i].s5 = String(rs.Fields.item("wallpaper_s5"));
wallpaper_array[i].s7 = String(rs.Fields.item("wallpaper_s7"));
wallpaper_array[i].pc = String(rs.Fields.item("wallpaper_pc"));
rs.Move(1);
i ++
} //end while
//draw results
%>
<%
for (i = 0; i < wallpaper_array.length; i++){
%>
<% if (wallpaper_array[i].revo == "true") { %>Revo <% } else { %>Revo<% } %> |
<% if (wallpaper_array[i].s5 == "true") { %>Series 5mx <% } else { %>Series 5mx<% } %> |
<% if (wallpaper_array[i].s7 == "true") { %>Series 7 <% } else { %>Series 7<% } %> |
<% if (wallpaper_array[i].pc == "true") { %>Windows <% } else { %>Windows<% } %>
<%= wallpaper_array[i].name %> by <%= wallpaper_array[i].author %>
<%= wallpaper_array[i].desc %>
<%
} //end for
%>
<%
} //close else
rs.Close ();
%>
:top:
Location :
© Michael Rhodes and Jason Morley 2000.
We're not associated with Psion in any way, shape or form.
In fact, they've probably never heard of us. Just so you know.
<%
if (logged_in == "True") {
Response.Write("You are logged in as " + current_user + " ");
if (user_status == "useradmin"){
%> Admin Home <%
} %> | Logout <% } %>
<% Conn.Close (); %>