Ik heb de volgende code geschreven,
Dee moet een paar banner URLs ophalen uit een database en die dan weergeven,
maar het werkt niet, ik krijg een lege pagina,
zie hier
Wie helpt?
Dee moet een paar banner URLs ophalen uit een database en die dan weergeven,
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
| <html>
<head>
<title>MWP Multimedia :: banners</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
set conn = server.createobject("adodb.connection")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("\mwpnl\db\banners.mdb")
conn.Open DSNtemp
sqlstmt = "SELECT * from banners
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, conn, 3, 3
TotalRecs = rs.recordcount
x = 0
For x = 1 to 9999
If rs.eof then
Exit For
Else
nummer = rs("ID")
plaatje = rs("picture")
link = rs("URL")
ondertitel = rs("ALT")
zien = rs("show")
zien = zien + 1
%>
<font face="Arial" size="3"><a href="<%= link %>">[img]"<%=[/img]" alt="Advertentie van:<%= ondertitel %>"></a></font>
<%
set conn = server.createobject("adodb.connection")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("\MWPnl\db\banners.mdb")
conn.Open DSNtemp
SQLstmt = "INSERT INTO linksdata (picture,URL,ALT,show)"
SQLstmt = SQLstmt & " VALUES ("
SQLstmt = SQLstmt & "'" & plaatje & "',"
SQLstmt = SQLstmt & "'" & link & "',"
SQLstmt = SQLstmt & "'" & ondertitel & "',"
SQLstmt = SQLstmt & "'" & zien & "'"
SQLstmt = SQLstmt & ")"
Set RS = conn.execute(SQLstmt)
%>
</body>
</html> |
maar het werkt niet, ik krijg een lege pagina,
zie hier
Wie helpt?