<%
number = request.QueryString("num")
if number<>"" then
%>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mappath("base/magazines.MDB") & ";"
SQL = "SELECT * From numbers where id="&number
Set rst = Conn.Execute(SQL)
picture=rst("picturename")
issuenumber=rst("name")
if rst ("anons") <> "" then
anons = rst("anons")
end if
set rst = nothing
set Conn = nothing
%>
:: Musiqi Dunyasi :: Catalogue ::
