By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
437,594 Members | 2,062 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 437,594 IT Pros & Developers. It's quick & easy.

Mscomm Modem via Bluetooth Problem

P: 1
Hello, here is my first question at thescripts.com :) Experts please help me

I use the following code to dial the bluetooth phone modem connected to my Laptop via serial port. The code dials the phone number well but after the sleep, it disconnects("ATH") resulting in the system crashes with the blue screen of death showing the following error:
IRQL_NOT_LESS_THAN_OR_EQUAL

I think the problem with the drivers and memory conflicts. Please give me an idea.

Expand|Select|Wrap|Line Numbers
  1. Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
  2.  
  3. Private Sub Form_Load()
  4.     Dim DialString As String, FromModem As String, dummy As String
  5.     MSComm1.InputLen = 0
  6.     MSComm1.CommPort = 9
  7.     MSComm1.Settings = "115200,n,8,1"
  8.     MSComm1.PortOpen = True
  9.     MSComm1.InBufferCount = 0
  10.     MSComm1.Output = "ATD 99863227654;" + vbCr
  11.     Sleep 5000
  12.     MSComm1.Output = "ATH" + vbCr
  13.     MSComm1.PortOpen = False
  14. End Sub
  15.  
For more information:
I use a HP Pavilion Laptop which has an integrated bluetooth, the phone is LG Dynamite.
Nov 27 '07 #1
Share this Question
Share on Google+
1 Reply


Dököll
Expert 100+
P: 2,364
Hello, here is my first question at thescripts.com :) Experts please help me

I use the following code to dial the bluetooth phone modem connected to my Laptop via serial port. The code dials the phone number well but after the sleep, it disconnects("ATH") resulting in the system crashes with the blue screen of death showing the following error:
IRQL_NOT_LESS_THAN_OR_EQUAL

I think the problem with the drivers and memory conflicts. Please give me an idea.

Expand|Select|Wrap|Line Numbers
  1. Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
  2.  
  3. Private Sub Form_Load()
  4.     Dim DialString As String, FromModem As String, dummy As String
  5.     MSComm1.InputLen = 0
  6.     MSComm1.CommPort = 9
  7.     MSComm1.Settings = "115200,n,8,1"
  8.     MSComm1.PortOpen = True
  9.     MSComm1.InBufferCount = 0
  10.     MSComm1.Output = "ATD 99863227654;" + vbCr
  11.     Sleep 5000
  12.     MSComm1.Output = "ATH" + vbCr
  13.     MSComm1.PortOpen = False
  14. End Sub
  15.  
For more information:
I use a HP Pavilion Laptop which has an integrated bluetooth, the phone is LG Dynamite.
Hello Sakibanda!

I found a number of links I thought might interest you:
http://www.google.com/search?sourcei...THAN_OR_EQUAL+

Please give them a whirl...
Nov 30 '07 #2

Post your reply

Sign in to post your reply or Sign up for a free account.