Recognising and opening the USB Modem

[Hishow]

Dear Experts, please I have come again for help. I have Huawei E1550. I want my form (OnLoad events) to recognise my Modem. Confirming from control panel/Modem, my Modem is named Comm5. I used the following code but it showing RunTime error *424*. Please help me. Thank you

Private Sub Form_Load()
 
MSComm1.Settings="9600,n,8,1"  
MSComm1.CommPort=5         
MSComm1.PortOpen=TRUE            
 
End Sub
 

[zmbd]

424 errors result when you haven't defined the object, in this case "MSComm1" and/or properly set the reference to the object.

In this case, I do believe that you are going to have to use an API call. I'll have to look in to that unless one of the other experts has more experience with setting the reference.

You also should consider setting the option explicit for all of your modules and properly defining your variables as given in the trouble shooting section > Before Posting (VBA or SQL) Code

[Hishow]

Thank yo for your reply. Please I will be waiting for your help on this.

[zmbd]

This is an older document from Microsoft; however, it might yet "fit the bill;" however, even if not a perfect fit, this will at least give us a starting point from which to jump:
ACC: How to Dial a Phone Number from MS Access 95/97 In the linked to article, instead of a function as shown in step 3 and assigning as shown in step 5 - create a sub and assign by:
Opening the form in design view,
Add the button
In the on_Click event, select the "Code Builder"
In the

Sub CommandButtonName_Click()
End Sub

that is created for the button event, insert the function's code as given above - including the parameters.

See how this goes. :)