Haw kann mein VB-Skript alle 5 Minuten automatisch ausführen

501
Trivendra Rajput

Ich schreibe ein VB-Skript und muss dieses Skript alle 5 Minuten als Auslöser ausführen

Mein Code lautet wie folgt:

Sub Write_data_record_into_a_table () '///////////////////////////////////////// ///////////////// 'de: Das Skript führt den angegebenen Datensatz in eine Tabelle' ///////////////// /////////////////////////////////////////

'Deklaration lokaler Tags - Deklaration von lokalen Variablen Dim conn, rst, SQL_Table

On Error Resume Next

Set conn = CreateObject ("ADODB.Connection") Set rst = CreateObject ("ADODB.Recordset")

'Datenquelle öffnen - Datenquelle öffnen conn.Open "Provider = MSDASQL; Anfangskatalog =" & SmartTags ("szDatabase") & _ "; DSN = Database_1"

'Fehlerroutine - Fehlerroutine Wenn Err.Number <> 0 Then ShowSystemAlarm "Fehler #" & Err.Number & "" & Err.Description Err.Clear Exit Sub End If

'Datensatz der Tabelle auswählen - Datensatz der Tabelle auswählen SQL_Table = "SELECT * FROM" & SmartTags ("szTableName") & "WHERE Nr =" & SmartTags ("nDat_No")' * = Alle Daten '* = alle Daten

'Schreibt einen Datensatz in eine Tabelle. Set rst = conn.Execute (SQL_Table)

'Fehlerroutine - Fehlerroutine Wenn Err.Number <> 0 Then ShowSystemAlarm "Fehler #" & Err.Number & "" & Err.Description Err.Clear Exit Sub End If

Wenn nicht (rst.EOF und rst.BOF), dann 'Compare, wenn "Dateiende" oder "Dateianfang" vorhanden ist, andernfalls wird der Zeiger auf den ersten Eintrag zurückgesetzt.' Vergleich ob "Dateiende" oder "Begin" von der Datei "ist, wenn nicht der Zeiger auf den Ersten Eintrag zurueckgesetzt ShowSystemAlarm" rst.close Else 'Definition des Datensatzes - Definition des Datensatzes SQL_Table = "INSERT INTO" & SmartTags ("szTableName") & "VALUES ('" & SmartTags ("nDat_No") & _ "", "" & SmartTags (") cur_Date ") &" ',' "& SmartTags (" Cur_time ") & _" ", '" & SmartTags ("nValue_1") &

'Datenquelle schließen - Datenquelle schließen conn.close

Set rst = Nothing Set conn = Nothing End Sub

0
Haben Sie versucht, sich die Datei `schtasks.exe` anzusehen: https://docs.microsoft.com/en-us/windows/desktop/TaskSchd/schtasks Mark vor 5 Jahren 2
@ Mark - Schreibe eine Antwort auf ... das ist der richtige Weg, dies zu tun. Kinnectus vor 5 Jahren 0
Vielen Dank @Kinnectus. Dies ist ein Duplikat von https://superuser.com/questions/80291/run-script-on-windows-every-n-minutes/1379409#1379409 Mark vor 5 Jahren 0
Mögliches Duplikat von [Skript alle n Minuten unter Windows ausführen] (https://superuser.com/questions/80291/run-script-on-windows-every-n-minutes) Mark vor 5 Jahren 2

0 Antworten auf die Frage