Tja har en liten kodsnutt som inte funkar riktigt... Snälla! Lite felbeskrivning/felmeddelnade vore inte helt fel!!! Även om det går att lista ut felet ändå så går det MYCKET fortare med felmeddelande och beskrivning... Ja men det var väl inte så svårt..Loop
<%
dim rad
Dim Conn, ConnEx, Query, qname, reqordnr, dbordnr
rad = "1"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("\bildsida_massa.mdb")
Query = "SELECT * FROM Bilder WHERE ID = "& rad &""
Set ConnEx = Conn.Execute(Query)
%>
<html>
<body>
<table border="1">
<%
Do until ConnEx.EOF
%>
<tr>
<td>![](images/nya_foton/<%=ConnEx("Liten")%>.jpg)
<SCRIPT type="text/javascript">
function win() {
msg=window.open("","msg","height=<%=ConnEx("Height")%>,width=<%=ConnEx("Width")%>,left=0,top=0");
msg.document.write("<html><title><%=ConnEx("Title")%></title>");
msg.document.write("<link rel='stylesheet' href='styles2.css'>");
msg.document.write("<body bgcolor='white' onblur=window.close()>");
msg.document.write("<div align='right' class='toptextblack'><%=ConnEx("Fotograf")%></div>");
msg.document.write("<center><img src='images/nya_foton/<%=ConnEx("Stor")%>.jpg' 'width='<%=ConnEx("Bwidth")%>' 'height='<%=ConnEx("Bheight")%>'></center><br>");
msg.document.write("<div class='brodtext12'><%=ConnEx("Stext")%></div>");
msg.document.write("<div align='right'>Stäng fönstret</div>");
msg.document.write("</body></html>");
<%
rad = rad + "1"
%>
<%
loop
%>
</table>
</body>
Pleas help....Sv: Loop
/JohanSv: Loop
sätt in ConnEx.MoveNext innan Loop så ska det nog gå bättre! ;)
<%=ConnEx("Ltext")%>