que hay de mal en esta sintaxis???

[damian2004]

If (MM_editRedirectUrl <> "") Then
Response.Redirect ("listo_log.asp?archivo=<%=(rs_listas.Fields.Item( "titulo").Value)%>")
End If

gracias

[u_goldman]

Response.Redirect ("listo_log.asp?archivo="&(rs_listas.Fields.Item(" titulo").Value))

[damian2004]

lo probe gracias, pero me devuelve este error

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: ''

te comento que estoy haciendo es un redirect despues de un insert.

gracias

[u_goldman]

mmmhhhh, pero existe ese recordset?

[Myakire]

Lo ideal sería que guardara en una variable el valor de rs_listas("titulo"), destruyera el objeto y luego redireccionara. Así no deja apuntadores perdidos por ahí .......... no estoy seguro pero supongo que ASP/IIS debe tener algún tipo de recolector de basura

[damian2004]

si existe porque lo estoy listando, y funciona bien.

alguna idea de como poder hacer lo que necesito???
gracias

[sjam7]

pon mas del codigo, quizas el problema este mas arriba

[damian2004]

<%
' *** Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues
Dim MM_dbValues

If (CStr(Request("MM_insert")) <> "") Then

' create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_formVal = MM_fields(MM_i+1)
MM_typeArray = Split(MM_columns(MM_i+1),",")
MM_delim = MM_typeArray(0)
If (MM_delim = "none") Then MM_delim = ""
MM_altVal = MM_typeArray(1)
If (MM_altVal = "none") Then MM_altVal = ""
MM_emptyVal = MM_typeArray(2)
If (MM_emptyVal = "none") Then MM_emptyVal = ""
If (MM_formVal = "") Then
MM_formVal = MM_emptyVal
Else
If (MM_altVal <> "") Then
MM_formVal = MM_altVal
ElseIf (MM_delim = "'") Then ' escape quotes
MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'"
Else
MM_formVal = MM_delim + MM_formVal + MM_delim
End If
End If
If (MM_i <> LBound(MM_fields)) Then
MM_tableValues = MM_tableValues & ","
MM_dbValues = MM_dbValues & ","
End If
MM_tableValues = MM_tableValues & MM_columns(MM_i)
MM_dbValues = MM_dbValues & MM_formVal
Next
MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"

If (Not MM_abortEdit) Then
' execute the insert
Set MM_editCmd = Server.CreateObject("ADODB.Command")
MM_editCmd.ActiveConnection = MM_editConnection
MM_editCmd.CommandText = MM_editQuery
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close

If (MM_editRedirectUrl <> "") Then
Response.Redirect ("listo_log.asp?archivo="&(rs_listas.Fields.Item(" Id").Value))
End If
End If

End If
%>

[Neuron_376]

Que error te arroja, o porque dices que esta mal ?

[Neuron_376]

No se cual sea el error, pero por lo pronto intenta esto:

Response.Redirect ("listo_log.asp?archivo=" & Server.URLEncode(Cstr(rs_listas("titulo"))))

ó

Response.Redirect ("listo_log.asp?archivo=" & Server.URLEncode(Cstr(rs_listas.Fields.Item("titul o").Value)))

Según el que prefieras...

Lo que hice fué tratar de corregir y prevenir cualquier error al momento de tratar el tipo del campo, al ver titulo, pienso que es varchar o algo asi, entonces, primero lo conviertes a tipo STRING con Cstr, por otra parte, lo estas pasando por una liga, si se trata de un titulo puede tener caracteres especiales como espacios en blanco, y si lo tratas de pasar de forma pura por el URL es lógico que te dará problemas, entonces, a esa cadena le aplicas URLEncode, para asegurar que se esta pasando correctamente por la liga.

Espero que te sirva, prueba cambiar las partes donde encuentras el mismo error y asegurarte de manejar bien los tipos de datos del recordset.

Suerte!!

[manou]

Buenas damian2004, no quiero parecer nada ... no se, no se me ocurre ningun calificativo, pero en fin, que no te ofendas ni te lo tomes a mal, pero me gustaria hacerte un par de sugerencias.
1) lee este documento: http://www.sindominio.net/ayuda/preg...eligentes.html
2) despues de tomarse la gente tantas molestias, comenta si el problema se ha solucionado o persiste... de esa manera tus dudas pueden servir de ayuda a la comunidad. Si se quedan a mitad sin saber como se soluciono,... solo te ayuda a ti.

Que vaya bonito

[Pachangero]

Saludos

manou La información esta de DIEZ

Muy buena página.

Gracias por la información.

[damian2004]

manou, primero te comento si animo de ofender como decis, vos, no se que tiene de malo lo que pregunté, varios usuarios contestaron, y de muy buena onda. Segundo, sino conteste si funcionó o no, lo que me pasaron en la última respuesta, es porque no vivo despierto las 24 hs pegado a la pc, esperando a que alguien conteste, y recien ahora tuve la oportunidad de poder entrar al foro, probe lo que me pasaron pero no funciona, debe haber algo mal en mi codigo anterior.

sin más...