Ho il problema di poter vedere immagini in una pagina asp costruita con
dreamweaver mx.
Nel database access il campo immagini contiene record costruiti con
inserisci oggetto e crea da file.
Quando apro la pagina asp ad essi collegata vorrei vedere le immagini che
sono appunto quei file.
Di seguito riporto il codice.
Scusate per la pedestre esposizione ma sono un novellino.
Grazie.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/pitture.asp" -->
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_pitture_STRING
Recordset1.Source = "SELECT * FROM pitture"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 10
Repeat1__index = 0
Recordset1_numRows = Recordset1_numRows + Repeat1__numRows
%>
<%
Dim Repeat2__numRows
Dim Repeat2__index
Repeat2__numRows = 10
Repeat2__index = 0
Recordset1_numRows = Recordset1_numRows + Repeat2__numRows
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<p> </p>
<%
While ((Repeat2__numRows <> 0) AND (NOT Recordset1.EOF))
%>
<p><%=(Recordset1.Fields.Item("immagini").Value)%></p>
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
Recordset1.MoveNext()
Wend
%>
<p><br>
<%
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF))
%>
<%=(Recordset1.Fields.Item("storia").Value)%> <br>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset1.MoveNext()
Wend
%>
</p>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
Ho eseguito con Dreamweaver MX e nella tabella , in Access, ho inserito il
riferimento all'immagine
con inserisci oggetto e crea da file. E il file appunto un immagine jpg.
Grazie ancora
