<%
Set URL = Request.ServerVariables("QUERY_STRING")
bol = split(URL,"/")
bolum = split(bol(3),".")
id = split(URL,"=")
if bolum(0) = "Kategoriler" then
Set conn =
server.CreateObject("Adodb.Connection")
conn.Open "Provider=
Microsoft.Jet.Oledb.4.0; Data Source = " &
server.Mappath("db.mdb")
Set rs = conn.execute("select * from tablo WHERE ID = " & id(1) & "")
Response.Write rs("alan")
End If
%>
Bu şekilde yapabilirsin.Split kullanımını öğrenmen gerekiyor..