vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Timer-Verzug durch DDE-Aufruf ? 
Autor: Novalis
Datum: 28.01.03 13:09

Hallo,

ich habe das Problem schonmal gepostet, jedoch hab ich es jetzt erst selbst verstanden *g*

Mein Timer zählt in Minutenintervallen runter, und ruft dann (zB alle 3 Minuten) per DDE einen Export auf... dieser dauert ca. 10 Sekunden.
Das Problem ist, daß der Timer demnach nach jedem Aufruf ca. 10 Sekunden hinterherhängt hinter seiner ursprünglichen Zeit - was dann auf lange Sicht einen riesigen Versatz der Datensätze bewirkt.

Hier der Code :

 
***************************************
'Timer 2 - export-intervall-bestimmung und anzeige
'***************************************************
Private Sub Timer2_Timer()
Static Minuten, Anzahl As Long
Dim ende As Label
Dim arr() As String

If expint.Text > "" And zahlenok(expint.Text, "0123456789") Then
Anzahl = expint.Text ' Neues Intervall
Timer2.interval = 60000 ' 60 Sekunden
Minuten = (Minuten + 1) Mod Anzahl
txt_exp.Text = Anzahl - Minuten

If Minuten > 0 Then Exit Sub

' Hier folgt der eigentliche Code
' für das Timer-Ereignis:

'####### Hier ist der Aufruf der den Verzug bewirkt
poken
'#######################################

Timer1_Timer

If (Replace(lbl_error.Caption, vbCrLf, "") = "None") Then
GoTo ende
Else
Timer1_Timer
Timer3.Enabled = True
Timer3_Timer
End If

End If
ende:
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Timer-Verzug durch DDE-Aufruf ?48Novalis28.01.03 13:09

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

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

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