| |
| |
|
| - page 1 - |
|
Robert
Hildebrand | allô zusammen,
j'ai 6 serielle Schnittstellen permanent abzufragen (Messgeraete) et muss cet dans einer banque de données (dBase) Sauver.
Hat quelqu'un une concept??
LG
Robert |
|
| |
| |
| |
|
|
| |
| |
| - page 3 - |
|
 | Könntest Du la fois un paire Sekunden qui Bytes aufnehmen et z.B. comme suis posten?
sûrement qui richtige Baud-numéro et initialisation? |
|
| |
| |
| |
|
|
Robert
Hildebrand | | peux z. Zt malheureusement seulement toujours un Byte abfragen, là je seulement une Schittstelle ( Com2 ) dans Betrieb habe |
|
| |
| |
| |
|
|
Robert
Hildebrand | | Sorry, je frage alle 14 Byte de einer Schnittstelle ab. |
|
| |
| |
| |
|
| |
| |
| - page 4 - |
|
|
Robert
Hildebrand | | allô IF, habe la fois un paire sekunden mitgeschrieben |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | allô Robert,
Hilft Dir cela plus?
KompilierenMarqueSéparationWindow 800,800
Def Desktop(0) ReadIni$("Hkey_1","SoftwareMicrosoftWindowsCurrentVersionExplorerShell Folders","DeskTop")
Declare Datei$,Zeile$,Zeile%,Part$,Hi$,Lo$,Byte&,Bit%
Datei$ = Desktop() + "\test.txt"
Assign #1,Datei$
Reset #1
WhileNot EoF(#1)
Inc Zeile%
Case Zeile% = 4:Break
Input #1,Zeile$
Print "Zeile: " + Str$(Zeile%)
WhileLoop 14
Part$ = SubStr$(Zeile$,&Loop," ")
Hi$= "%" + Left$(Part$,4)
Lo$= "%" + Right$(Part$,4)
Byte& = Val("%" + Part$)
Print Hi$,Hex$(Val(Hi$)),Lo$,Hex$(Val(Lo$))
Wend
Print ""
Wend
Close #1
WaitInput
|
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 16.06.2009 ▲ |
|
| |
|
|
Robert
Hildebrand | allô Jörg,
cela hilft mir déjà insoweit plus, dass je maintenant qui höher- et niederwertigen Bytes auslesen peux. je peux malheureusement encore pas comment im VB Voir le texte source, herauslesen quelle payons justement sur meinem Messgerät angezeigt volonté.
quand même déjà la fois vielen Dank |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | tu as dessus une html Dossier angehängt. Gib doch la fois den Link en supplément à. So peux on qui Bilder pas voyons. avec Bildern wird cela Ganze peut-être quelque chose ersichtlicher. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 16.06.2009 ▲ |
|
| |
|
|
Robert
Hildebrand | allô Jörg,
hiel ist qui link
[...]  |
|
| |
| |
| |
|
|
Robert
Hildebrand | Problem gelöst.!!! 
Dank Jörgs Aider et viel rumprobieren et testen konnte je qui données enfin auslesen.
Schätze encore un paire Tage et cela Programme ist fertig.
je werde es ensuite ici posten. |
|
| |
| |
| |
|
|
| Jau, würd je toll trouver weil cela un Grund wäre pour mich, mir aussi einmal solch Messgerät zuzulegen. (*g*)
(je voulais déjà toujours la fois messen peut dans comment loin sich mon Widerstand ändert si je une litre l'eau trop mir pris habe) |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Robert Hildebrand, Beitrag=52713, Zeitpunkt=17.06.2009
Problem gelöst.!!! Dank Jörgs Aider et viel rumprobieren et testen konnte je qui données enfin auslesen. Schätze encore un paire Tage et cela Programme ist fertig. je werde es ensuite ici posten.
Super! je hatte encore aucun Gelegenheit dans qui html-Dossier avec den Bildern richtig reinzuschauen. qui étions so pixelig, qui je seulement zum opticien voulais, um mon Augen überprüfen trop laisser  . qui stellt car quelque chose comme comme Anleitung ins Netz... tz..tz..tz
Umso besser, si Du es hinbekommen la hâte. peut-être peux Du den Code la fois posten. Evtl. peux on ihn gemeinsam et avec ca optimaliser. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 18.06.2009 ▲ |
|
| |
|
|
Robert
Hildebrand | | Ist bestimmt encore verbesserungswürdig, peux mais maintenant wenigstens qui Les chiffres des Multimeter auslesen |
|
| |
| |
| |
|
(871)
Deutsch
English
Français
Español
Italia