Pitanja i odgovori na temu ASP

Odgovor na pitanje: Baza konekc. i recordset

Dim cnn, rs, ide, tutor

Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("04programi.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")

where po id: (ide je jednadžba)

rs.Open "SELECT ID,ocjena FROM vicevi WHERE cstr(id)=""" + ide + """", cnn, 0

where asc od A do Z
rs.Open "SELECT Naziv FROM Mjesta WHERE ZupanijaID=""" + CStr(zid) + """ ORDER BY Naziv asc", cnn, 0

where kad su dva uvjeta
rs.Open "SELECT * FROM Mjesta WHERE ZupanijaID=""" + CStr(zid) + """ and cstr(broj)=""" + broj + """ ORDER BY Naziv asc", cnn, 0

where po"nazivu": ili kad nije jednadžba
rs.Open "SELECT id,brojocjena,ocjena,ime,upis,kategorija,datum from vicevi where kategorija like""%" + "Ne znam" + "%""", cnn, 0

where desc (od Z do A)
rs.Open "SELECT * FROM Novosti ORDER BY Datum DESC", cnn, 0

i onda kroz petlju vadimo sve što trebamo
do until rs.eof = true
    tutor=rs("tema_id")
    response.write cstr(tutor)
    rs.movenext
    loop

rs.close
    set rs=nothing
    cnn close
    set cnn=nothing