Hola amigos.
Tengo un archivo donde realizo conaxion a BD y varios movtos relacionados a BD.
se llama MovsDB.asa, el archivo va mas o menos asi....
<%
....
Function Buscar_Area(CadBuscar)
....
if VarBoolencontro Then
Buscar_Area = false
else
Buscar_Area = true
end if
End Function
....
%>
La funcion se ejecuta sin ningun problema y lo hace todo correctamente. El problema esta en el momento de mandarla a llamar desde un Script de
VB.
lo hago de la sig manera.
Este es mi archivo ASP
Movtos.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
...
<SCRIPT LANGUAGE = "VBScript">
...
sub Busca_onClick
dim x, cad
cad = trim(document.all.TxtClaveArea.value)
x = <%=Buscar_Area(cad)%> 'Aca llamo la funcion y Segun yo envio el valor de cad
if x then
...
else
...
end if
end sub
...
</SCRIPT>
...
</body>
</html>
La pregunta es, como envio el parametro?????, porque asi como lo tengo siempre me regresa el mismo resultao, aunque mi variable cad cambie de valor.
Al parecer la funcion recibe como parametro el valor cad y no lo que esta variable contiene.
Espero puedan ayudarme.
Gracias y Suerte.