| |

Visual-Basic EinsteigerCOM1 under Acess 2002 mit VB steuern | |  | Autor: tklang | Datum: 29.01.04 15:32 |
| Grützi, mitanander !
Habe bis vor 10 Jahren mit Machine code, GW Basic und Turbo Pascal 7 programmiert.
Jetzt würde ich gerne eine Kurzwellen-Hörer - Datenbank unter Access 2002 erstellen.
Habe einen Kurzwellen-Empfänger der sich mit 5 Bytes über die serielle Schnittstelle steuern lässt, wäre doch super, wenn ich die Frequenz direkt über Access einstellen könnte. ----- Aber : Dies ist meine ERSTE Erfahrung mit VB.
Ah, ich habe viel über MScomm1 control gefunden, aber wie krieg' ich die ins Access und Woher ? UND: Komplet-Version von VB 6.0 als download ?
P.S.: Mein Verbindungskabel funktioniert mit kommerziellen Programmen hervorragend.
Also, meine Idee (die nicht funktioniert, ihr wisst wahrscheinlich warum ("COM1" und PRINT ?)
Private Sub Send_Data_Click()
Dim filenr As Integer
filenr = FreeFile
Open "COM1" For Output As #filenr
MsgBox " Filenumber :" + Str(filenr)
' CAT on
Print #filenr, &H0
Print #filenr, &H0
Print #filenr, &H0
Print #filenr, &H0
Print #filenr, &H0
' Frequency = 14 210 Khz (backwards)
Print #filenr, &H1
Print #filenr, &H10
Print #filenr, &H42
Print #filenr, &H1
Print #filenr, &H1
' CAT off
Print #filenr, &H0
Print #filenr, &H0
Print #filenr, &H0
Print #filenr, &H80
Print #filenr, &H0
Close #filenr
MsgBox "Data sent"
End Sub |  |
 | Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
  |
|
vb@rchiv CD Vol.6 vb@rchiv Vol.6
Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
Online-Update-Funktion Entwickler-Vollversionen u.v.m.Jetzt zugreifen Tipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) sevZIP40 Pro DLL 
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere Infos
|
|
|
Copyright ©2000-2025 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|