XProfan

Français

helpself

Salut,

là je sonst dans VB schreibe bräuchte je maintenant Eure Unterstützung.

1. je voudrais volontiers un laufendes Programme avec einer bestimmen l'heure finissons.
Hat evt. quelqu'un déjà so quoi geschrieben?

2. comment peux je un faute im Prog. übergehen? dans VB gibt es oui den Befehl On Error.

Vielen Besten Dank

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jörg
Sellmeyer

Salut,

qui Funktion Time$() liefert Dir qui aktuelle Zeit. tu dois alors seulement dans regelmaßigen Abständen Votre eingestellte Zeit avec qui aktuellen Zeit comparer.

il y a deux Arten de Fehlermeldungen dans Profan. Einmal tatsächliche faute, z,B. Division par zéro ou bien Wurzel aus einer negativen numéro. qui mener zum finissons des Programms, là im Interpreter selber cette faute auftritt, b.z.w. verarbeitet volonté doit.
ensuite gibt es Warnungen, qui erlauben, qui cela Programme weiterläuft. qui Stabilität hängt ensuite vom weiteren Code ab, si Dein Programme avec cela tourner autour de peux.

qui Fehlermeldungen peux Du unterdrücken, indem Du avec Set("Errorlevel",n) qui Ausgabe beeinflußt.
cela peux ensuite mais zum unkontrollierten Absturz avec entsprechender Windowsreaktion mener.

il y a encore qui Possibilité avec Aider de "ErrorProc" une eigene Fehlerbehandlung trop écrivons, qui im piège eines Fehlers fonctionnement wird.
cela greift mais z.B. pas dans den dessus erwähnten Fällen.
Ansonsten empfehle je ausgiebiges Testen et Bugtracking avant qui Auslieferung

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

E.T.

Hatte avant Ewigkeiten la fois un Progg geschrieben (welches chez mir encore toujours sans Probleme täglich fonctionne), quoi dans etwa so quelque chose pouvoir. finissez zwar ne...aucune Programme mais cela ganze Windows, mais im Prinzip cela gleiche.
si du intérêt la hâte, peux je dir oui den Voir le texte source envoyons...

Ist mais gar pas so grave cela ganze, im Prinzip seulement une gespeicherte l'heure avec qui aktuelle Zeit comparer (je mach cela alle 20 sec., so ist es zumindest Minuten-oui c'est ca).

aus.jpg	44 kB

Hochgeladen:	02.12.2011

Downloadcounter:
		Download

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

helpself

Salut,

pour qui Tipps, dass avec qui l'heure finissons habe je aussi déjà hinbekommen et merci pour cela Angebot pour den Voir le texte source.

malheureusement bekomme je es pas hin, den faute übergehen.

j'ai là folgenen Code pris um Fichiers sur un d'autre Verzeichnis trop kopieren. qui données liegen sur einem anderen Server, wohin ab et trop Serverarbeiten durchgeführt volonté et cet ensuite pas plus zur Disposition stehen. Es venez trop einer Fehlermeldung. ou bien aussi si qui Dossier déjà ouvert ist.

qui Code:
ClearList
Verzeichnis1$ = "k\"
Verzeichnis2$ = "H:\"
ChDir Verzeichnis1$
AddFiles "*.pdf"
WhileLoop 0,%getcount
Copy Verzeichnis1$ + ListBoxItem$(& Loop) > Verzeichnis2$ + ListBoxItem$(& Loop)
Wend

Hat quelqu'un une concept?

Besten Dank

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jörg
Sellmeyer

quoi sagt qui Fehlermeldung car? quoi passiert, si Du ErrorLevel sur 0 mets?
dans diesem le cas pourrait qui ErrorProc une gute Solution son, um so une faute trop verarbeiten.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

helpself

Es venez ensuite: Copy Verzeichnis1$ + ListBoxItem$(& Loop) > Verzeichnis2$ + ListBoxItem$(& Loop)

weil, allez pas. malheureusement habe je encore aucun Erfahrung avec dem ErrorLevel de Xprofan.

Muss mich encore un un peu erlesen....

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

là es time$() aussi comme native Funktion gibt pourrait il une Fil starten et aus qui Fil-nProc une UserMessage senden -

somit serait il sich cela ständige Zeitprüfen per Hauptereignisschleife ersparen.

Ooooder il prend getTickCount et seulement trop Programmbeginn errechnet il qui getTickCount qui trop un certain Zeit gelten serait et finissez après cela Prg.

XProfan X2
Vista (TM) Home Premium, SP2, Core(TM)2 Duo P8600 @ 2.40GHz

02.12.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jörg
Sellmeyer

je serait empfehlen, erstmal qui simple variante trop prendre.

Stehen car dans Deinen Variablen aussi qui richtigen Werte?
Ansonsten peux Du dans qui Boucle sur %error testen et entsprechend agir.
Votre Beschreibung qui Fehlermeldung ist toujours pas très aussagekräftig. quoi ist qui genaue Wortlaut? Läuft cela Programme après plus? dans welchem ErrorLevel (siehe Aider) befindest Du toi.

Prinzipiell könntet Du cela so intercepter:
Kompilieren Marque Séparation

Set("ErrorLevel",0)
Var n% = 0

While n% < %getcount

    Copy Verzeichnis1$ + ListBoxItem$(&Loop) > Verzeichnis2$ + ListBoxItem$(&Loop)

    If %error

        MessageBox("Ein Fehler ist aufgetreten","Die Datei " + Verzeichnis1$ + ListBoxItem$(&Loop) + " konnte nicht kopiert werden",0)

    EndIf

    Inc n%