que estoy haciendo mal ?

tecnologico · #1 (**permalink**) 11/04/2009, 12:40

<%

comb1 = CStr(Request.Form("Provincia"))
comb2 = CStr(Request.Form("ciudad"))
comb3 = CStr(Request.Form("calle"))

Dim oConn, rs, SQL, cuenta, categoria

Set oConn = Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & Server.MapPath("Poblaciones.mdb")&" ; Jet OLEDB:Database Password=741"
rs.Open SQL, oConn

<% if request.Form = "" then response.redirect "poblacion.asp" %>
<% else
response.Write("comb1:"&request.form("provincia")& "<BR>comb2 :"&request.form("ciudad")&"<BR> comb3 :"&request.form("calle"))
END IF
%>

ME SALE ERROR EN SINTAXIS LINEA 20 DONDE ESTA EL ELSE

Desde ya gracias

David · #2 (**permalink**) 11/04/2009, 12:48

Prueba colocando el Reponse.Redirect en una nueva línea, así:

Código asp:

Ver originalIf Request.Form = "" Then
    Response.Redirect "..."
Else
    Response.Write(...)
End If

tecnologico · #3 (**permalink**) 11/04/2009, 15:27

gracias por la ayuda

mc_quake · #4 (**permalink**) 11/04/2009, 17:22

el error es el siguiente en la linea que te marco con rojo, ya que estas ocupanto un Request.Form
pero no rescatas nada se usa asi Request.Form("nombre_del_componente_del_formulario ")

<%
If Request.Form = "" Then
response.redirect "poblacion.asp"
Else
response.Write("comb1:"&request.form("provincia")& "<BR>comb2 :"&request.form("ciudad")&"<BR> comb3 :"&request.form("calle"))
End If
%>