testare pagina ASP

**zeweb** · 15-07-2004, 08:50

Ho un problema, il mio IIS oggi non vuole girare per testare questo sito e on-line in staging la configuarzione del server di Telecom non mi fa vedere l'errore ! Se vi posto il link con le variabili e la popup che si deve apriore me la testate e mi dite in quale riga è l'errore ?

Grazieeee!

codice:

<a href="javascript:product('product_oriz.asp?id=<%=rs("id")%>&modulation=<%=rs("modulation")%>');">

popup

codice:

<%session.LCID = 1044 %> 
<% 
id=request.querystring("id") 
'APERTURA CONNESSIONE CON IL DATABASE SENZA DSN 
Set objConn = Server.CreateObject("ADODB.Connection") 
objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../../fpdb/wire_products.mdb") 
set rs=server.createobject("ADODB.Recordset") 
strSQL = "select * from [wireless product] where id = " & id
rs.Open strSQL, objConn 
if not rs.EOF then
%> 
<%=rs("title")%>


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

<%=rs("MODEL")%> qui volevo stmapre tutti i MODEL separati da,

<% 
end if 
rs.Close 
set rs=nothing 
objConn.Close 
set objConn=nothing 
%>

**zeweb** · 15-07-2004, 15:40

mi aiutate x favore ...casomai già così a video mi sapete dire dove sbaglio ?

**deleted_c** · 15-07-2004, 15:47

codice:

<%session.LCID = 1044 %> 
<% 
id=request.querystring("id") 
'APERTURA CONNESSIONE CON IL DATABASE SENZA DSN 
Set objConn = Server.CreateObject("ADODB.Connection") 
objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../../fpdb/wire_products.mdb") 
set rs=server.createobject("ADODB.Recordset") 
strSQL = "select * from [wireless product] where id = " & id
rs.Open strSQL, objConn 
if not rs.EOF then
%> 
<%=rs("title")%>


<% 
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** · 15-07-2004, 15:55

cosa significa WEND

codice:

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

**deleted_c** · 15-07-2004, 15:56

fine del ciclo while

**zeweb** · 15-07-2004, 15:59

che bello che è il tuo eCOmmerce...è in vendita ?

**zeweb** · 15-07-2004, 16:01

purtroppo non va ancora ! Ti posto la pagina intera !

codice:

<%session.LCID = 1044 %> 
<% 
id=request.querystring("id") 
'APERTURA CONNESSIONE CON IL DATABASE SENZA DSN 
Set objConn = Server.CreateObject("ADODB.Connection") 
objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../../fpdb/wire_products.mdb") 
set rs=server.createobject("ADODB.Recordset") 
strSQL = "select * from [wireless product] where id = " & id
rs.Open strSQL, objConn 
if not rs.EOF then
%>
<html>
<head>
<title>AUREL | Wireless | Product Info</title>
</head>
<body onload="adatta();" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<table width="603" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td height="35" background="/wireless/images/fond_top_popup_uk.jpg" class="testiblu"></td>
  </tr>
  <tr> 
    <td width="603" background="/wireless/images/fondino_popup_cs.gif">      <table border="0" cellspacing="3" cellpadding="0" width="100%">
        <tr> 
          <td width="88%" class="titoligrigi">
            <table width="100%"  border="0" cellspacing="0" cellpadding="2">
              <tr>
                <td class="titoli"><%=rs("title")%> <span class="titolirossi">
                  <% if CInt(rs("New"))=1 Then %> 
New !
<% Else %>
<%response.write "" %>
<% End If %>
</span></td>
              </tr>
            </table>            <b class="titolirossi">
                    [/b]          </td>
          <td width="12%"><table border="0" cellpadding="1" cellspacing="1" align="right">
            <tr>
              <td class="testogrigio"><div align="right">[img]/wireless/images/print2.gif[/img]</div></td>
              <td><div align="center" class="testo">|</div></td>
              <td><span class="right">Close</span></td>
            </tr>
          </table></td>
        </tr>
        <tr>
          <td colspan="2"><table width="100%"  border="0" cellpadding="2" cellspacing="0">
            <tr>
              <td>[img]/wireless/images/lwin.gif[/img]<span class="titoliverdi"> <%=rs("Model")%></span><span class="testo"> | Cod. <%=rs("Part Number")%></span> </td>
              </tr>
            <tr>
              <td> <table width="100%" border="1" cellpadding="2" cellspacing="0" bordercolor="#99CCFF">
                  <tr>
                    <td bordercolor="#E1F0FF" bgcolor="#E1F0FF" class="testineri"> <span class="right"><span class="testineri">                    <span class="testo"><%=rs("description_S")%></span>                    </span> </span></td>
                  </tr>
                            </table></td>
              </tr>
          </table></td>
        </tr>
        <tr>
          <td colspan="2" class="testo"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
            <tr valign="baseline">
              <td valign="top" class="testo"></td>
              <td valign="top" class="testo"></td>
            </tr>
            <tr valign="baseline">
              <td width="47%" valign="top" class="testo"><table  border="0" cellpadding="5" cellspacing="0">
                <tr>
                  <td> [img]<%=rs([/img]" alt="<%=rs("title")%>" border="0" ></td>
                </tr>
              </table></td>
              <td width="53%" valign="top" class="testo"><table width="100%" border="0" cellpadding="3" cellspacing="0">
                <tr>
                  <td class="titolibianchi"><b class="right">                        <span class="titoliverdi"> </span>[/b]                    <b class="titoliverdi"> Technical Specification[/b]</td>
                </tr>
                <tr>
                  <td class="titolibianchi">
                    <table width="100%" border="0" cellpadding="2" cellspacing="0" bordercolor="#CCCCCC">
                      <tr>
                        <td width="100%" class="testo"><span class="right"></span> <span class="right"></span> <%=rs("Char5")%></td>
                        </tr>
                      <tr>
                        <td class="testo"><span class="right"></span> <%=rs("Char6")%></td>
                        </tr>
                      <tr>
                        <td class="testo"><span class="right"></span> <%=rs("Char1")%></td>
                        </tr>
                      <tr>
                        <td class="testo"><span class="right"></span> <%=rs("Char2")%></td>
                        </tr>
                      <tr>
                        <td class="testo"><span class="right"></span> <%=rs("Char3")%></td>
                        </tr>
                      <tr>
                        <td class="testo"><span class="right"></span> <%=rs("Char4")%></td>
                        </tr>
                  </table></td>
                </tr>
              </table></td>
            </tr>
            <tr valign="baseline">
              <td colspan="2" valign="top" class="testo"><table width="100%"  border="0" cellspacing="2" cellpadding="2">
                <tr>
                  <td class="titoli">Downloads</td>
                </tr>
              </table></td>
              </tr>
            <tr>
              <td colspan="2" valign="baseline" class="testo">                <table width="100%" border="0" cellpadding="2" cellspacing="0">
                <tr>
                  <td class="testo"><span class="titolirossi">                    </span>                    <table width="593" height="0%" border="1" cellpadding="2" cellspacing="2" bordercolor="#F9F9F9">
                    <tr bordercolor="#99CCFF" bgcolor="#E1F0FF" class="right">
                      <td width="140" height="20"><div align="center">Short Form</div></td>
                      <td width="140" height="20"><div align="center">Application Notes</div></td>
                      <td width="173" height="20"><div align="center">User Manual</div></td>
                      <td width="140" height="20"><div align="center">DoC</div></td>
                    </tr>
                    <tr>
                      <td><div align="center" class="copyright">
                            <div align="center">
                              <table  border="0" cellspacing="0" cellpadding="2">
                                  <tr>
                                    <td><% if isNull(rs("Short"))=true or len(Trim(rs("Short")))<2 then
                          response.write "<span class='avviso'>not available</span>"%>
                                        <%Else%>
                                        
                                      <%response.write "<span class='right'>download</span><span class='copyright'>
 " &dimensione & " Kb" & "</span>"
End If
 %></td>
                                  </tr>
                              </table>
                            </div>
                      </div></td>
                      <td class="right"><div align="center" class="copyright">
                            <div align="center">
                              <table  border="0" cellspacing="0" cellpadding="2">
                                  <tr>
                                    <td><% if isNull(rs("Application Notes"))=true or len(Trim(rs("Application Notes")))<2 then
                          response.write "<span class='avviso'>not available</span>"%>
                                        <%Else%>
                                        
                                      <%response.write "<span class='right'>download</span><span class='copyright'>
 " &dimensione & " Kb" & "</span>"
End If
 %></td>
                                  </tr>
                              </table>
                            </div>
                      </div></td>
                      <td class="right"><div align="center" class="testo">
                          <div align="center"><span class="copyright"> </span>
                                <table  border="0" cellspacing="0" cellpadding="2">
                                    <tr>
                                      <td><span class="copyright">
                                        <% if isNull(rs("User Manual"))=true or len(Trim(rs("User Manual")))<2 then
                          response.write "<span class='avviso'>not available</span>"%>
                                        <%Else%>
                                        
                                        <%response.write "<span class='right'>download</span><span class='copyright'>
" &dimensione & " Kb" & " | "& rs("DateUM") &" | "& rs("Rev")&"</span>"
End If
%>
                                      </span></td>
                                    </tr>
                                </table>
                                <span class="copyright"> </span></div>
                      </div></td>
                      <td class="right"><div align="center" class="copyright">
                            <div align="center">
                              <table  border="0" cellspacing="0" cellpadding="2">
                                  <tr>
                                    <td><% if isNull(rs("DoC"))=true or len(Trim(rs("DoC")))<2 then
                          response.write "<span class='avviso'>not available</span>"%>
                                        <%Else%>
                                        
                                      <%response.write "<span class='right'>download<span><span class='copyright'>
" &dimensione & " Kb" & "</span>"
                          End If
						  %></td>
                                  </tr>
                              </table>
                            </div>
                      </div></td>
                    </tr>
                  </table>
                    <% 
end if 
rs.Close 
set rs=nothing 
%></td>
                </tr>
                <tr>
                  <td class="testo">[img]/wireless/images/spacer_arancio.gif[/img]</td>
                </tr>
                <tr>
                  <td class="testo">                    <table width="100%"  border="0" cellspacing="0" cellpadding="2">
                      <tr>
                        <td><span class="testo">Product's Compatibility:</span>
<% 
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
%>

                          <span class="testo"><%=rs("MODEL")%></span>

                          <span class="avviso"> <%=rs("notes")%><span class="titolibianchi"></span></span></td>
                      </tr>
                    </table>                    <span class="avviso"><span class="titolibianchi">
<% 
rs.movenext
wend
end if
rs.Close 
set rs=nothing 
objConn.Close 
set objConn=nothing 
%>
                    </span></span></td></tr>
              </table></td>
            </tr>
          </table></td>
        </tr>
      </table>
      <div align="left"><span class="titolirossi"><span class="testo">
    </span></span></div></td>
  </tr>
</table>
</body>
</html>

**deleted_c** · 15-07-2004, 16:05

cosa c'è che no va?!

**zeweb** · 15-07-2004, 16:15

purtroppo non mi gira IIS e la config del server di telecom non mi fa vedere l'errore...non capisco se simulo altri siti ASP tutto ok, ma questo non mi gira più su IIS..non capisco ho settato tutto homedir odbc...ma nulla !

Discussione: testare pagina ASP

Strumenti discussione

Ricerca discussione

Visualizza

testare pagina ASP

Permessi di invio