funcion en asp

rokiu · #1 (**permalink**) 04/09/2007, 05:13

hola buenas, necesito hacer lo siguiente:

kiero saber si es posible hacer una funcion dentro de un asp("funcion_pepito.asp") y luego llamarla dede cualquier asp pasandole los parametros adecuados.

Y si es posible, saber si para recoger el resultado se hace de = forma que en C++, es decir, que la llamada esté asignada a una variable del mismo tipo de datos que devuelve la función.

Sino es posible hacerlo así,com puedo hacerlo para no tener que repetir codigo en cada asp???

gracias, un saludo

Ascariz · #2 (**permalink**) 04/09/2007, 06:05

no se puede hacer lo que dices.

Pero como yo lo ago es haciendo un include con todas las funciones y le inserto en todos mis asp

Pagina principal

Código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<!-- #INCLUDE virtual = "/includes/funciones.asp" -->

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

/includes/funciones.asp

Código:

Function Seguridad ()
   codigo [.....]

end function

JuanRAPerez · #3 (**permalink**) 04/09/2007, 07:59

si puedes hacerlo
lo del include como se te indico y tu funcion.

Cita:

function CorregirCaracteres(StrCambiar)
StrCambiar = Replace(StrCambiar,"ñ","ñ")
StrCambiar = Replace(StrCambiar,"á","á")
StrCambiar = Replace(StrCambiar,"é","é")
StrCambiar = Replace(StrCambiar,"í","í")
StrCambiar = Replace(StrCambiar,"ó","ó")
StrCambiar = Replace(StrCambiar,"ú","ú")
StrCambiar = Replace(StrCambiar,"Ñ","Ñ")
StrCambiar = Replace(StrCambiar,"Á","Á")
StrCambiar = Replace(StrCambiar,"É","É")
StrCambiar = Replace(StrCambiar,"Í","Í")
StrCambiar = Replace(StrCambiar,"Ó","Ó")

CorregirCaracteres = StrCambiar
end function

y lo usas

Cita:

corregircaracteres(str_o_tu_recordset)

suerte

rokiu · #4 (**permalink**) 04/09/2007, 12:46

y en funcicones.asp, es un fichero por defecto, o es aí donde tengo que programar las que yo kiera????

gracias

rokiu · #5 (**permalink**) 04/09/2007, 12:47

pk tu include esta comentado????

AlZuwaga · #6 (**permalink**) 04/09/2007, 13:17

Cita:

y en funcicones.asp, es un fichero por defecto, o es aí donde tengo que programar las que yo kiera????

no, no es un fichero por defecto. es el nombre que Ascariz decidió darle, pero podrías ser cualquier otro. ejemplo:

Código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<!-- #INCLUDE virtual = "/includes/pepitodelospalotes.asp" -->

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1...

Cita:

pk tu include esta comentado????

Porque así se ponen los includes en ASP.

Saludos

rokiu · #7 (**permalink**) 04/09/2007, 13:51

muchas gracias.

Para recoger el valor que me devuelve la función, es sufciente igualarla a una variable?'

gracias

AlZuwaga · #8 (**permalink**) 04/09/2007, 14:07

Si, claro. Aunque también podés hacer un response.write de la función sin asignársela a una variable... todo depende de qué quieras hacer y de qué devuelva dicha función:

pepitodelospalotes.asp:

Código:

function valor_de_a(a)
    valor_de_a = a
end function

otra_pagina.asp:

Código:

<!-- #INCLUDE virtual = "/includes/pepitodelospalotes.asp" -->
<p>el valor de a en este momento es <% = valor_de_a(6) %></p>
<% a = valor_de_a(1) %>
<p>el valor de a en este momento es <% = a %></p>

rokiu · #9 (**permalink**) 04/09/2007, 15:21

haber, especifico lo que quiero.

necesito hacer una funcion, que pasandole un campo de una base de datos, me devuelva otro. si lo igualo a una variable(devolver), luego se puede hacer algun tipo de return(devolver)????

gracias

rokiu · #10 (**permalink**) 04/09/2007, 16:01

VALE, ya se como hacer que una funcion me devuelva una determinada variable que se use en la misma.

el problema que tengo ahora eske me da error lo siguiente:

idblog=saber_idblog(titulo_blog)

me dice que no coinciden los tipos!!!, la funcion me devuelve un numero, y la variable idblog aunke la inicialice a '0' me sigue dando el mismo error!!! pk???

llamo bien a la funcion?

Ascariz · #11 (**permalink**) 05/09/2007, 01:30

Llamas bien a la funcion.

Puedes poner algo mas de codigo....

pero tu le puedes pasar un tipo y que retorne otro tipo.

rokiu · #12 (**permalink**) 05/09/2007, 01:50

idblog=saber_idblog(titulo_blog) esta es la llamada, idblog se define aki, titulo_blog, es una variable que me pasan de un formulario(es texto)

y esta es la funcion:

<%
function saber_idblog(titulo_blog) ' OBTENER LA ID DEL BLOG, APARTIR DEL TITULO RECOGIDO DEL FORMULARIO Y SI ESE BLOG ES DE DICHO USUARIO
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "bloggus"

sSTR= " select idblog,titulo,idusu from blogs where titulo='"&titulo_blog&"'"
Set Rs = Conn.Execute(sSTR)

if not rs.EOF then
id_blog=Rs("idblog")
'Posibilidad de que el blog exista pero no sea del usuario que quiere realizar la aportacion
if Rs("idusu")==session ("usuario")
valido=true
else
valido=false
response.write("<center>NO TIENE PERMISO PARA REALIZAR APORTACIONES EN EL BLOG ESPECIFICADO</center>")
end if
else
id_blog=0
response.write("<center>EL BLOG ESPECIFICADO NO EXISTE</center>")
end if

'cerramos el RecordSet y lo destruimos
Rs.Close
conn.close
Set Rs = Nothing
saber_idblog=id_blog
end function
%>

y cuando hago el include lo ago despues del <%, eso esta bien??? o lo tengo que hacer antes???

rokiu · #13 (**permalink**) 05/09/2007, 05:02

Error de Microsoft VBScript en tiempo de ejecución error '800a000d'

No coinciden los tipos: 'saber_idblog'

/Bloggus/asp/crear_aportacion.asp, line 25

ESTE ES EL ERROR, MAS EXACTAMENTE

Ascariz · #14 (**permalink**) 05/09/2007, 05:21

Primero son los includes genericos, como configuraciones y funciones y despues todo lo demas.

La linea 25 es donde llamas a la funcion o dentro de la funcion ?

rokiu · #15 (**permalink**) 05/09/2007, 05:28

donde la llamo.

los includes genericos???? me puedes explicar mas, estoy muy muy verde en asp

gracias

rokiu · #16 (**permalink**) 05/09/2007, 11:14

??? ayuda please!!