Mental retardation

[filburt1]

I saw that as I posted it and fixed it, but it didn't make a difference.

This seems to work but I like the original function much better:

Public Function MakeURL(Suffix As String, Optional hostname As String, Optional port As Long, _
         Optional path As String) As String
    If hostname = Empty Then hostname = ServerSettings.Address
    If port = 0 Then port = ServerSettings.port
    If path = Empty Then path = ServerSettings.path
    
    MakeURL = "http://" & hostname & IIf(port = "80", "", ":" & port) & path & Suffix
End Function