ho fatto una semplice interrogazione di un database access che in risposta mi da una tabella con gli elementi trovati, da questa poi si passa alla scheda del prodotto selezionano uno dei campi di risposta. Quando vado sul campo per accedere alla scheda nella barra di stato di eplorer mi compare il collegamento corretto ad es:
http://www.miosito.it/Pagine/db/Inserzione.asp?ID=3"
ma una volta aperta la pagina della scheda mi compare sempre il record 1 con vari collegamenti del tipo
http://www.miosito.it/Pagine/db/Inserzione.asp?ID= 3 "
COME MAI? IN COSA SBAGLIO?
se volete dare un'occhiata questo è il codice
tante grazie ragazzi

<table width="600" border="0" cellspacing="0" cellpadding="5">
<tr>
<td colspan="3" align="center" valign="top" width="1121">
<table border="0" width="100%" cellspacing="0" cellpadding="5" bgcolor="#800000">
<tr>
<td width="100%" align="center" bgcolor="#FFFFFF">
<div align="left"><font color="#003366">
<%


id2=request.querystring("id")

If IsNumeric(id2) Then
id2 = cdbl(id2)
Else
id2 = 1
End If


sql="select *from taba where id="&id2

Set OBJdbConnection= Server.CreateObject("ADODB.Connection")
'OBJdbConnection.Open"driver={Microsoft Access Driver (*.mdb)};dbq=/a.mdb"
OBJdbConnection.Open "DBQ=" & Server.MapPath(Session("DBPath") & "\a.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"'DriverId=25;MaxBufferSize=8192;Threads=20;"


Set RS=OBJdbConnection.Execute(sql)
id = rs("id")
categoria = rs("categoria")
titolo = rs("titolo")
sottit = rs("sottit")
testo = rs("testo")
note = rs("note")
'im = rs("imm")

%>
</font> </div>
</td>
</tr>
</table>
<div align="left"><font color="#003366" face="Times New Roman, Times, serif">
</font></div>
</td>
</tr>
<tr>
<td align="center" valign="top" width="560">
<div align="left"><font color="#003366" face="Times New Roman, Times, serif">
<%=id%>
</font></div>
</td>
<td align="center" valign="top" width="561"><font color="#003366" face="Times New Roman, Times, serif">
<%=categoria%>
</font></td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2">
<div align="left"><font color="#003366" face="Times New Roman, Times, serif">
<%=data%>
</font></div>
</td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2">
<div align="center">
<p> </p>
<p><b><font color="#003366" face="Arial, Helvetica, sans-serif" size="4">
<%=sottit%>
</font></b></p>
</div>
</td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2">
<div align="left"><font color="#003366" face="Arial, Helvetica, sans-serif" size="3">
<%=titolo%>
</font></div>
</td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2"><font color="#003366" face="Arial, Helvetica, sans-serif" size="3"></font></td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2">
<div align="left"><font face="Arial, Helvetica, sans-serif" color="#003366" size="3">
<%=testo%>
</font></div>
</td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2">
<div align="left"><font color="#003366" face="Arial, Helvetica, sans-serif" size="3">
<%=note%>
</font></div>
</td>
</tr>
<tr>
<td align="center" valign="top" width="1121" colspan="2"> </td>
</tr>
</table>

<%




'if testo<>"-"then


'Set objFileSys=Server.CreateObject("Scripting.FileSystemObject")



'varInputFile=Server.MapPath("/a")+"\annunci\"+a

'Set objTsIn=objFileSys.OpenTextFile(varInputFile)

'Do Until objTsIn.AtEndOfStream
'i=i+1
'response.write(objTsIn.ReadLine)
'loop
'objTsIn.Close
'end if
%>
<p> </p>
<p> 

scusa, ma dov'e' il link per la scheda prodotto?

grazie ragazzi ma niente da fare
sempre uguale