%@Language = VBScript%> <%Option Explicit%>
<%
Dim rs,area,namn,bild
area = CInt(Request.QueryString("area"))
bild = Request.QueryString("bild")
dbConnect
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM area",db
Response.Write "
| ||||
|
" style="border:solid #000000 1px;"> |
<%=rs("rubrik")%> |
<%=rs("texten")%> |