The Open Source Swiss Army Knife

/code/vbscript/
/code/vbscript/ + sub-categories
http://www.sirfsup.com/
web directory content
    
      

Not logged in
Chat Register Login
return to:  http:/www.sirfsup.com      /code   /vbscript 
Permalink: empty.txt
Title: add
article options : please login   |  raw source view  

1

If IsNull(Me.txtSearchField) Then

MsgBox ("please enter a name to search for ......

the above code executes when nothing is typed in the txtSearchField txtbox

2. use the len function

If Not (Len(Forms![Ajout Habilitation]![Sub 1].Form![Fin Validité Temp]))
= Null Then MsgBox "Le clown" ' <=This Line is executed (ligne2) Else
MsgBox "bozo" End If If (Len(Forms![Ajout Habilitation]![Sub 1].Form![Fin
Validité Temp])) = Null Then MsgBox "coup de tete" ' < = This Line is
executed (ligne7) Else MsgBox "balayette" End If

If someone know why, please help me.

From: Patrick Goupell

Date: 02-27-02 18:26
Subject:

The len function returns a numeric value, try

If Len(Forms![Ajout Habilitation]![Sub 1].Form![Fin Validité Temp]) = 0
Then MsgBox "bozo" else MsgBox "Le clown" ' <=This Line is executed
(ligne2) End If

3


Leave a Reply
Your Name:     anonymous
Your Email:
Website:  
Comments:

The author will be notified of your reply.
return to top