71 messaggi dal 06 settembre 2002
ah mi mancava rowspan='0' ,
comunque in questo modo non si allinea sotto la colonna quadri questa riga:
strHTML = strHTML & "<td width=""11%"" align=""left"">" & objRsQuad("quadro") & "</td>"
e di conseguenza anche le altre.

71 messaggi dal 06 settembre 2002
ciao albis, scusami se ti rompo ancora,
puoi aiutarmi ugualmente?
grazie

1.605 messaggi dal 06 settembre 2002
puoi inviare il risultato html ?

FORZA LA MAGICA ROMA

FORZA LA MAGICA ROMA
71 messaggi dal 06 settembre 2002
si, eccolo:

<html>
<head>
<title>quadri</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<link rel="stylesheet" href="stile.css" type="text/css">
</head>

<body bgcolor="#000000" text="#999999">


<div align="center">

<table width="779" border="0" height="255" cellpadding="0" cellspacing="0" >
<tr>
<td width="31%" valign="top" align="left" height="202"><img src="images/logo.jpg" width="245" height="186" border="0"></td>
<td height="202" align="center" valign="baseline" colspan="6"><img src="images/artisti.gif" width="131" height="56"></td>
</tr>
<tr>
<td width="31%" height="26"><img src="images/transparent.gif" width="1" height="1"></td>
<td width="17%" height="26" align="left">
<h4><b><font face="Verdana, Arial, Helvetica, sans-serif">Artista</font></b></h4>
</td>
<td width="11%" height="26" align="left">
<h4><b><font face="Verdana, Arial, Helvetica, sans-serif">Titolo</font></b></h4>
</td>
<td width="11%" height="26" align="left">
<h4><b><font face="Verdana, Arial, Helvetica, sans-serif">Tecnica</font></b></h4>
</td>
<td width="10%" height="26" align="left">
<h4><b><font face="Verdana, Arial, Helvetica, sans-serif">Anno</font></b></h4>
</td>
<td width="12%" height="26" align="left">
<h4><b><font face="Verdana, Arial, Helvetica, sans-serif">Dimensioni</font></b></h4>
</td>
<td width="8%" height="26" align="center"> </td>
</tr>


<tr>

<td width="31%"><img src="images/transparent.gif" width="1" height="1"></td>

<script language=javascript>
function esempio(str) {
searchWin = window. open(str,'esempio','scrollbars=no,resizable=yes,width=300 ,height=320,status=no,location=no,toolbar=no');

// searchWin.refer = self;
}
</script>

<script language=javascript>
function esempio(str) {
searchWin = window. open(str,'esempio','scrollbars=no,resizable=yes,width=300 ,height=320,status=no,location=no,toolbar=no');

// searchWin.refer = self;
}
</script>

<script language=javascript>
function esempio(str) {
searchWin = window. open(str,'esempio','scrollbars=no,resizable=yes,width=300 ,height=320,status=no,location=no,toolbar=no');

// searchWin.refer = self;
}
</script>
<td width="17%" rowspan='3' align="left">Nespolo Ugo</td><td width="11%" align="left">prova</td><td width="11%" align="left">pittorica</td><td width="10%" align="left">1998</td><td width="12%" align="left">345</td><td width="8%"><a href="javascript:esempio('immagini.asp?id=7');">Immagine</a></td></tr><td width="11%" align="left">pp</td><td width="11%" align="left">oo</td><td width="10%" align="left">1966</td><td width="12%" align="left">125</td><td width="8%"><a href="javascript:esempio('immagini.asp?id=8');">Immagine</a></td></tr><td width="11%" align="left">pp</td><td width="11%" align="left">oo</td><td width="10%" align="left">1966</td><td width="12%" align="left">125</td><td width="8%"><a href="javascript:esempio('immagini.asp?id=9');">Immagine</a></td></tr>


</table>

</div>
</body>
</html>


428 messaggi dal 06 settembre 2002
Scusate se mi intrometto, ma cosa significa
objRsQuad.filter = "art_ID=" & objRsArt("art_ID") ?
a cosa serve? cosa fa? sono curioso! scusatemi!


http://www.manikomio.it
-La gente da buoni consigli se non può più dare il cattivo esempio-

§§################################################§§
-La gente da buoni consigli se non può più dare il cattivo esempio-
§§################################################§§
71 messaggi dal 06 settembre 2002
è praticamente un filtro che viene applicato al recordset RsQuad per la corrispondenza tra i due campi art_ID presenti in due tabelle diverse.
ciao

1.605 messaggi dal 06 settembre 2002
scusami avevo sbagliato prova così
<%
Dim objConn
dim lngContaQuadri
dim blnPrimo
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "driver={Microsoft Access Driver (*.mdb)};DBQ= d:\www\dati\artisti.mdb"
'creazione recordset di artisti e quadri
Dim objRsArt
Dim objRsQuad
Set objRsArt = Server.CreateObject ("ADODB.Recordset")
Set objRsQuad = Server.CreateObject ("ADODB.Recordset")
Dim strSQL
strSQL = "SELECT * FROM artisti"
objRsArt.Open strSQL, objConn
strSQL = "SELECT * FROM quadri"
objRsQuad.Open strSQL, objConn
Do until objRsArt.EOF
blnPrimo = true
lngContaQuadri = 0
strHTML = ""
%>
<tr>

<td width="31%"><img src="images/transparent.gif" width="1" height="1"></td>
<%
strHTML = "<td rowspan='0' width=""17%"" align=""left"" valign=""top"" >" & objRsArt("Artisti") & "</td>"


objRsQuad.filter = "art_ID=" & objRsArt("art_ID")

do until objRsQuad.EOF
lngContaQuadri = lngContaQuadri + 1


if blnPrimo = true then
blnPrimo = true
strHTML = strHTML & "<td width=""11%"" align=""left"">" & objRsQuad("quadro") & "</td>"
strHTML = strHTML & "<td width=""11%"" align=""left"">" & objRsQuad("tecnica") & "</td>"
strHTML = strHTML & "<td width=""10%"" align=""left"">" & objRsQuad("anno") & "</td>"
strHTML = strHTML & "<td width=""12%"" align=""left"">" & objRsQuad("dimensioni") & "</td>"
strHTML = strHTML & "<td width=""8%""><a href=""javascript:esempio('immagini.asp?id=" & objRSQuad("ID") & "');"">Immagine</a></td></tr>"
else
strHTML = strHTML & "<tr><td width="31%"><img src=""images/transparent.gif"" width=""1"" height=""1""></td>"
strHTML = strHTML & "<td width=""11%"" align=""left"">" & objRsQuad("quadro") & "</td>"
strHTML = strHTML & "<td width=""11%"" align=""left"">" & objRsQuad("tecnica") & "</td>"
strHTML = strHTML & "<td width=""10%"" align=""left"">" & objRsQuad("anno") & "</td>"
strHTML = strHTML & "<td width=""12%"" align=""left"">" & objRsQuad("dimensioni") & "</td>"
strHTML = strHTML & "<td width=""8%""><a href=""javascript:esempio('immagini.asp?id=" & objRSQuad("ID") & "');"">Immagine</a></td></tr>"
end if

objRsQuad.movenext
loop
strHTML = Replace(strHTML,"rowspan='0'","rowspan='" & lngContaQuadri & "'"
Response.Write strHTML
'azzero il filtro
objRsQuad.filter = ""
objRsArt.MoveNext
Loop
%>


</table>





FORZA LA MAGICA ROMA

FORZA LA MAGICA ROMA
71 messaggi dal 06 settembre 2002
ancora niente albis, il problema rimane identico!

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.