InternetCreateUrl

Declare Sub InternetCreateUrl Lib "wininet.dll" _
             Alias "InternetCreateUrlA" ( _
             ByRef lpUrlComponents As [[URL_COMPONENTSA]], _
             ByVal dwFlags As Long, _
             ByVal lpszUrl As String, _
             ByRef lpdwUrlLength As Long)