<% 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 ::

1 / 1999
1 / 2000
2 / 2000
3-4 / 2000
1-2 / 2001
3-4 / 2001
1-2 / 2002
3-4 / 2002
1-2 / 2003
3-4 / 2003
1-2 / 2004
3-4 / 2004
1-2 / 2005
3-4 / 2005
1-2 / 2006
3-4 / 2006
1-2 / 2007
3-4 / 2007
1-2 / 2008
3-4 / 2008
1-2 / 2009
3-4 / 2009
1-2 / 2010
3 / 2010
4 / 2010
1 / 2011
2 / 2011
3 / 2011
4 / 2011
1 / 2012
2 / 2012
3 / 2012
4 / 2012
1 / 2013
2 / 2013
3 / 2013
4 / 2013

 

 

 

 

O
U

about magazine <%end if%>