Fantasy art by sandra chang
<% application("appa")="driver={Microsoft ACCESS Driver (*.mdb)};dbq=" & Server.MapPath("access_db\netcommander.mdb") set conna = Server.CreateObject("ADODB.Connection") conna.open application("appa") set rsa = Server.CreateObject("ADODB.Recordset") rsa.CursorType = 2 'Set the cursor type we are using so we can navigate through the recordset rsa.LockType = 3 'Set the lock type so that the record is locked by ADO when it is updated %> <% if request.querystring("gal_id") = "" or request.querystring("gal_id") = "1" then %> <% else %> <% sql = "select * from fantasy where gal_id = " & clng(request.querystring("gal_id")) rsa.Open sql, conna %> <% end if %>

Lord of the Rings - Helm's Deep

Drawn in pencil, then scanned into the computer and painted in
Photoshop. I love Lord of the Rings: Two Towers. I wanted
to depict the heat of battle with the Uruk-hai. I even posed
myself as reference for the main Uruk-hai being slashed in the
stomach by Aragorn.
<% set check_prt = rsa("buy_print") %> <% if check_prt <> "" then %> <% else %> <% end if %> <% if request.querystring("gal_id") = "23" then %> <% else %> <% end if %>
"> " target="_blank"> ">

<% = rsa("Title") %>

<% = rsa("Description") %>

" border=0>
<% application("appc")="driver={Microsoft ACCESS Driver (*.mdb)};dbq=" & Server.MapPath("access_db\netcommander.mdb") set connc = Server.CreateObject("ADODB.Connection") connc.open application("appc") set rsc = Server.CreateObject("ADODB.Recordset") rsc.CursorType = 2 'Set the cursor type we are using so we can navigate through the recordset rsc.LockType = 3 'Set the lock type so that the record is locked by ADO when it is updated sql = "select * from fantasy where break_field = 'l' order by gal_id asc" rsc.Open sql, connc %> <% do while not rsc.eof %> <% rsc.movenext loop set rsc = nothing set connc = nothing %>
">" border=0>
<% application("appc")="driver={Microsoft ACCESS Driver (*.mdb)};dbq=" & Server.MapPath("access_db\netcommander.mdb") set connd = Server.CreateObject("ADODB.Connection") connd.open application("appc") set rsd = Server.CreateObject("ADODB.Recordset") rsd.CursorType = 2 'Set the cursor type we are using so we can navigate through the recordset rsd.LockType = 3 'Set the lock type so that the record is locked by ADO when it is updated sql = "select * from fantasy where break_field = 'r' order by gal_id asc" rsd.Open sql, connd %> <% do while not rsd.eof %> <% rsd.movenext loop set rsd = nothing set connd = nothing %>
">" border=0>