MSComm i VB DLL

Menu -> Project -> References.. Tilføj den der..

Private Sub Form_Load()
Dim objCom As New MSComm '<- eller det navn du har kaldt den.
  objCom.Output
End Sub

Hej sjh,

Tak for dit svar, mit håb var det kunne gøres uden en form, men alas. Godt det ikke er en opgave i kode optimering :-)

Mvh Kresten

Jeg kan se at det ikke lige var det du mente...

'------------------------- Class1 -------------------------
' HUSK at tilføje -> Microsoft Comm Control x.0 ellers for
' du nok fejl i ...WithEvents objMSComm As....
'----------------------------------------------------------
Option Explicit

Private objMSComm As Object
Private WithEvents objMSComm As MSCommLib.MSComm

Private Sub objMSComm_OnComm()
  MsgBox "OnComm"
End Sub

Private Sub Class_Initialize()
  Set objMSComm = CreateObject("MSCOMMLib.MSComm")
End Sub

Private Sub Class_Terminate()
  Set objMSComm = Nothing
End Sub
'------------------------- Class1 -------------------------

Smukt,

Jeg siger mange tak for hjælpen!
Mvh Kresten