variabile nel ciclo e stampa !

[zeweb]

come si fa creare una variabile all'interno del ciclo e poi stampare quella ?
[CODE]

<%
modulation=request.querystring("modulation")
strSQL="SELECT MODEL FROM [Wireless product] WHERE modulation = '" & replace(modulation,"'","''") & "' "
set rs=server.CreateObject("ADODB.recordset")
rs.Open strSQL, objConn
while not rs.EOF
%>
<%=rs("MODEL")%>
<%
rs.movenext
wend
end if
rs.Close
set rs=nothing
objConn.Close
set objConn=nothing
%>

[zeweb]

mi spiego volevo stampare i rs "MODEL" in successione separati da ,

a, b, c, ...

[optime]

mi sembra che tu lo faccia gia'.... forse ti manca una virgola, potresti usare (ma forse e' un'azzardo).... Response.Write!

[zeweb]

così ?

<% 
dim model
modulation=request.querystring("modulation")
strSQL="SELECT MODEL FROM [Wireless product] WHERE modulation = '" & replace(modulation,"'","''") & "' "
set rs=server.CreateObject("ADODB.recordset")
rs.Open strSQL, objConn
while not rs.EOF
%>

<%
model = rs("MODEL") 
Response.write Replace(testo,VbCrLF,",")
%>

[zeweb]

anzi così....

<% 
dim model
modulation=request.querystring("modulation")
strSQL="SELECT MODEL FROM [Wireless product] WHERE modulation = '" & replace(modulation,"'","''") & "' "
set rs=server.CreateObject("ADODB.recordset")
rs.Open strSQL, objConn
while not rs.EOF
%>

<%
model = rs("MODEL") 
Response.write Replace(model,VbCrLF,",")
%>

[optime]

quante complicazioni per un semplice

Response.Write rs("model") & ", "


!

[zeweb]

mi va a capo dopo la virgola e io li vorrei sulla stessa riga !

<%
Response.Write rs("model") & ", "
%>

[zeweb]

ho scritto così visto che deve aprire sulla stessa popup

<%response.write "http://&modulation=<%=rs("modulation...get=""_self"">"%>

ma non va !

[zeweb]

Expected end of statement

/wireless/Uk/product_oriz.asp, line 231

response.write "<a href=""product_oriz.asp?id=<%=rs("id")
-----------------------------------------------------^
dove sbaglio..? Devo ripassare 2 variabili "id" e "model"

[CODE]
<%
id=request.querystring("id")
modulation=request.querystring("modulation")
strSQL="SELECT model, id FROM [Wireless product] WHERE modulation = '" & replace(modulation,"'","''") & "' "
set rs=server.CreateObject("ADODB.recordset")
rs.Open strSQL, objConn
while not rs.EOF
%>
<%
response.write "http://&modulation=<%=rs("modulation...del") & ", "">"
%>

<%
rs.movenext
wend
rs.Close
set rs=nothing
objConn.Close
set objConn=nothing
%>

[optime]

usa l'apice singolo < ' > invece delle doppie virgolette < "" >