OpenOffice.info

Sub Main
  oFSO  = createUnoService("com.sun.star.bridge.OleObjectFactory").createInstance("Scripting.FileSystemObject") 

  f = oFSO.OpenTextFile("COM1:9600,N,8,1", 1) 'for Reading
'  f = oFSO.OpenTextFile("COM1:9600,N,8,1", 2) 'for Writing
'  f.write("abc")
  f.close

End Sub

Hallo zusammen,

ich nopch mal.

Zum seriellen Port habe ich schon mal was gefunden.

[code]

Sub Main
oFSO = createUnoService("com.sun.star.bridge.OleObjectFactory").createInstance("Scripting.FileSystemObject")

f = oFSO.OpenTextFile("COM1:9600,N,8,1", 1) 'for Reading
' f = oFSO.OpenTextFile("COM1:9600,N,8,1", 2) 'for Writing
' f.write("abc")
f.close

End Sub

[/code]

Jetzt fehlt nur noch eine Aussage zum parallelen Port.

Gruß
Werner

Hallo zusammen,

kann man unter OOo-Basic den Parallel-Port ansprechen, so wie das unter VB und QB möglich ist?

für einen Hinweis wäre ich sehr dankbar, da ich bisher noch nichts gefunden habe.

mit Gruß
Werner