ASP - procedimientos y funciones en asp

mi drama es el siguiente no se como crear una funcion, lo he intentado pero no funciona , la idea es que si el campo de la base viene con fecha nula ( 1/1/1960) o con numero -1 me ponga un espacio blanco oo de lo contrario el valor de la variable para ello hice esta funcion, pero no hace nada de nada, alguien me podria explicar cual es el error, y a parte como
retornan lops valores en asp las funciojnes y procedimientos. gracias.

Function NoMostrarNulo(valor,flag)
Dim num, fecha
If (flag=num) Then
If (valor = -1 ) Then
NoMostrarNulo = " "
else NoMostrarNulo = valor
End If
else
If (flag=fecha) Then
If (valor = "1/1/1960" ) Then
NoMostrarNulo = " "
else NoMostrarNulo = valor
End If
End If
End If

End Function

Hola.

En principio, si vas a devolver un espacio para la página, mejor pones " " que " ". Si no es por esto, tambien te faltaría poner una clausula else al "If (flag=fecha) Then" porque este caso no devolvería nada a la función. Si tampoco es por esto, necesitaría saber para que es el parámetro "flag". Espero que esto te ayude.

Un saludo:
David Grimaldi.

el flag es solo una bandera para saber si es numero o fecha y discriminar, en todo caso la saque y probe con esto, pero me sigue saliendo la fecha que considero null 1/1/1960m aqui esta el codigo

Function NoMostrarNulo(valor)

If (valor = intNulo ) Then
NoMostrarNulo = " "
else NoMostrarNulo = valor
End If

If (valor = FechaNula ) Then
NoMostrarNulo = " "
else NoMostrarNulo = valor
End If

End Function

gracias por la yuda , saludos

Hola de nuevo.

Para asegurarte de que las comparaciones son entre fechas, aplicale a cada fecha la función "cdate" quedando así:

Function NoMostrarNulo(valor)

If (valor = intNulo ) Then
NoMostrarNulo = " "
else NoMostrarNulo = valor
End If

If (cdate(valor) = cdate(FechaNula) ) Then
NoMostrarNulo = " "
else NoMostrarNulo = valor
End If

End Function

También ten en cuenta que mejor sería separar la función en dos, una para las fechas y otra para los números. Lo más sencillo sería que no aplicases valores como nulos sino que pudieses dejarlos realmente nulos. Para comprobar si un valor es nulo o no (sea cual sea el tipo) tienes la función IsNull(valor) que devuelve true si el valor es nulo. Espero que esto te ayude.

Un saludo.
David Grimaldi.

funciono rebien con las fechas mas no con los numeros,
y eso que he intentado haciendo conversiones del tipo cstr , cint,
gracias por las sugerencias valiosas.

leo