Solved

Invalid Use of Null with a hyperlink field

Posted on 2004-09-07
4
276 Views
Last Modified: 2008-02-20
OK, this one has me about to throw the computer out the window.

I am sending a report from a form using a command button.  The message body will include a link to the document associated with the report - I am pulling that from a hyperlink field called FilePath.  Sometimes that path will be empty, and I can't figure out how to handle it.

Here is the onclick for the command button.

Private Sub Command42_Click()
On Error GoTo Command42_Err
Dim strFilePath As String

strFilePath = Mid(Me.FilePath, 4, Len(Me.FilePath) - 4)


DoCmd.SendObject acSendReport, "rptMemoSend", "SnapshotFormat(*.snp)", , , , "Executive Secretariat Tasking", "Please see the attached document for tasking information related to the following link. <\\pasa27dc01\office shares" & strFilePath & ">", True

Command42_Exit:
    Exit Sub

Command42_Err:
    MsgBox Error$
    Resume Command42_Exit

End Sub

I've tried every freaking combination of If - Else, and If - ElseIf statement I can think of and always get either a data type mismatch, an object required, or, most frequently, an Invalid Use of Null error.

Please - send some advice or a small explosive device this way.
0
Comment
Question by:mattturley
  • 2
4 Comments
 
LVL 65

Accepted Solution

by:
Jim Horn earned 250 total points
ID: 12002650
if len(Nz(me.FilePath, "")) > 0 then

   'There's a URL with it...
    DoCmd.SendObject acSendReport, "rptMemoSend", "SnapshotFormat(*.snp)", , , , "Executive Secretariat Tasking", "Please see the attached document for tasking information related to the following link. <\\pasa27dc01\office shares" & strFilePath & ">", True

else
    'There's not a URL with this.
    DoCmd.SendObject acSendReport, "rptMemoSend", "SnapshotFormat(*.snp)", , , , "Executive Secretariat Tasking", "Some other piece of text", True

end if

Hope this helps.
-Jim
0
 
LVL 41

Expert Comment

by:shanesuebsahakarn
ID: 12002653
Well, I'd do something like this:

If IsNull(Me.FilePath) Then
   'The file path is null, do something
Else
   'It isn't empty, send the message.
   strFilePath = Mid(Me.FilePath, 4, Len(Me.FilePath) - 4)
   DoCmd.SendObject acSendReport, "rptMemoSend", "SnapshotFormat(*.snp)", , , , "Executive Secretariat Tasking", "Please see the attached document for tasking information related to the following link. <\\pasa27dc01\office shares" & strFilePath & ">", True
End If
0
 

Author Comment

by:mattturley
ID: 12002758
Thanks Jimhorn...

this is what I ended up using.

If Len(Nz(Me.FilePath, "")) > 0 Then

   'There's a URL with it...
    strFilePath = Mid(Me.FilePath, 4, Len(Me.FilePath) - 4)
    DoCmd.SendObject acSendReport, "rptMemoSend", "SnapshotFormat(*.snp)", , , , "Executive Secretariat Tasking", "Please see the attached document for tasking information related to the following link. <\\pasa27dc01\office shares" & strFilePath & ">", True

Else
    'There's not a URL with this.
    DoCmd.SendObject acSendReport, "rptMemoSend", "SnapshotFormat(*.snp)", , , , "Executive Secretariat Tasking", "Please see the attached document for tasking information.", True

End If

Only difference was that you had not set the strFilePath variable.

Thanks again!

For my (and other's) education... what was most likely causing the Invalid Use of Null?

0
 
LVL 65

Expert Comment

by:Jim Horn
ID: 12006169
Cool beans man.

Null is when there's nothing in a field.  It's different from an empty string "", and it's a pain in the a#@ to handle.  In a field such as URL, where you can't really force the user to enter one if none exists, the best you can do is trap it using the Nz function (Null-to-zero), and handle it accordingly.  

When doing table design, the more fields you set to .Required = True, the less headache this will be, although sometimes it isn't possible, like a person's Alias if they really have none.

Glad I can help.
-Jim

0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When you are entering numbers in a speadsheet, and don't remember what 6×7 is, you just type “=6*7" instead. It works in every cell! This is not so in Access. To enter the elusive 42 in a text box, you have to find a calculator, and then copy the re…
I originally created this report in Crystal Reports 2008 where there is an option to underlay sections. I initially came across the problem in Access Reports where I was unable to run my border lines down through the entire page as I was using the P…
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …

860 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question