%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% dim objconn, objRS, objRS1, objRS2 Set objConn= Server.CreateObject("adodb.Connection") objConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("../cgi-bin/radio.mdb") Set objRS2 = server.CreateObject("ADODB.Recordset") set objRS2 = objConn.execute ("SELECT * FROM brani") %>