Frage : sched Aufgabe pw über Befehlszeile ändern

Ich habe eine Liste des Jobs (Aufgabe) im Scheduler, das erfordern, um pw alle 30 Tage zu ändern.  dieses werden Schmerz des Ansatzes, damit alle 30 Tage jedes, anklicken das Eigentum, zurückstellten das Kennwort durchlaufen. und dann wissen apply.

I, dass es ein Programm im System gibt, das „schtasks“ genannt wird, die mir erlauben, die ganze Aufgabe zu verzeichnen, die, ich habe,
also kann pw über Befehlszeilen ändern.  und ich kann meinen Systemnamen durch typing
hostname in der Befehlszeile finden, z.B. VSRV1

current Name:  run_1, Durchläufe unter VSRV! \ ABC, wo ABC das Benutzer name
current pw ist:      pw1
new pw zum Zurückstellen pw2

the zum synax des Beispiels sagt:

schtasks /CHANGE /tn run_1 /S VSRV1 /RP pw2
and, das ich erhalte, reagieren:  „Zugang wird "

can verweigert, das, jemand mir Besondere wie sollte ich tun, um die pw-Änderungen über oben vorzunehmen helfen?

thanks

Antwort : sched Aufgabe pw über Befehlszeile ändern

Meine einfache Probe

Einen Kostenzähler verursachen.
In qrband.beforeprint Inc. der Kostenzähler
In der qrband.afterprint Überprüfung der Kostenzähler und wenn es als erforderliche Kraft eine neue Seite ist.

Das Codebeispiel sehen

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
194:
195:
196:
197:
198:
199:
200:
201:
202:
203:
204:
205:
206:
207:
208:
209:
210:
211:
212:
213:
214:
215:
216:
217:
218:
219:
220:
221:
222:
223:
224:
225:
226:
227:
228:
229:
230:
231:
232:
233:
234:
235:
236:
237:
238:
239:
240:
241:
242:
243:
244:
245:
246:
247:
248:
249:
250:

Maßeinheit Unit1;

Schnittstelle

Gebrauch
  Windows, Mitteilungen, SysUtils, Varianten, Kategorien, Grafiken, Kontrollen, Formen,
  Dialoge, StdCtrls, QuickRpt, QRCtrls, ExtCtrls, DB, DBTables;

Art
  TForm1 = Kategorie (TForm)
    Table1: TTable;
    QuickRep1: TQuickRep;
    QRBand2: TQRBand;
    QRDBText1: TQRDBText;
    QRDBText2: TQRDBText;
    QRDBText3: TQRDBText;
    Button1: TButton;
    Verfahren Button1Click (Absender: TObject);
    Verfahren QRBand2BeforePrint (Absender: TQRCustomBand; var PrintBand: Boolesch);
    Verfahren QRBand2AfterPrint (Absender: TQRCustomBand; BandPrinted: Boolesch);
  privat
    {Private Erklärungen}
  Öffentlichkeit
    {Allgemeine Erklärungen}
  Ende;

var
  Form1: TForm1;
  I: Ganze Zahl;

Implementierung

{$R *.dfm}

Verfahren TForm1.Button1Click (Absender: TObject);
anfangen
  I: = 0;
  QuickRep1.Preview;
Ende;

Verfahren TForm1.QRBand2AfterPrint (Absender: TQRCustomBand; BandPrinted: Boolesch);
anfangen
  wenn i-Umb. 5 = 0 dann
    QuickRep1.NewPage;
Ende;

Verfahren TForm1.QRBand2BeforePrint (Absender: TQRCustomBand; var PrintBand: Boolesch);
anfangen
  Inc. (i);
Ende;

Ende.


die Form

Gegenstand Form1: TForm1
  Links = 245
  Oberseite = 92
  Untertitel = „Form1“
  ClientHeight = 464
  ClientWidth = 854
  Farbe = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = „Tahoma“
  Font.Style = []
  OldCreateOrder = falsch
  Eingestuft = falsch
  PixelsPerInch = 96
  TextHeight = 13
  Gegenstand QuickRep1: TQuickRep
    Links = 76
    Oberseite = 54
    Breite = 794
    Höhe = 1123
    Frame.Color = clBlack
    Frame.DrawTop = falsch
    Frame.DrawBottom = falsch
    Frame.DrawLeft = falsch
    Frame.DrawRight = falsch
    Datensatz = Table1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = „Arial“
    Font.Style = []
    Functions.Strings = (
      „PAGENUMBER“
      „COLUMNNUMBER“
      „REPORTTITLE ")
    Functions.DATA = (
      „0“
      „0“
      #39#39)
    Wahlen = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poPortrait
    Page.PaperSize = A4
    Page.Values = (
      100.000000000000000000
      2970.000000000000000000
      100.000000000000000000
      2100.000000000000000000
      100.000000000000000000
      100.000000000000000000
      0.000000000000000000)
    PrinterSettings.Copies = 1
    PrinterSettings.OutputBin = Automobil
    PrinterSettings.Duplex = falsch
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.UseStandardprinter = falsch
    PrinterSettings.UseCustomBinCode = falsch
    PrinterSettings.CustomBinCode = 0
    PrinterSettings.ExtendedDuplex = 0
    PrinterSettings.UseCustomPaperCode = falsch
    PrinterSettings.CustomPaperCode = 0
    PrinterSettings.PrintMetaFile = falsch
    PrinterSettings.PrintQuality = 0
    PrinterSettings.Collate = 0
    PrinterSettings.ColorOption = 0
    PrintIfEmpty = richten aus
    SnapToGrid = richten aus
    Maßeinheiten = Millimeter
    Lautes Summen = 100
    PrevFormStyle = fsNormal
    PreviewInitialState = wsNormal
    PrevInitialZoom = qrZoomToFit
    Gegenstand QRBand2: TQRBand
      Links = 38
      Oberseite = 38
      Breite = 718
      Höhe = 40
      Frame.Color = clBlack
      Frame.DrawTop = falsch
      Frame.DrawBottom = falsch
      Frame.DrawLeft = falsch
      Frame.DrawRight = falsch
      AfterPrint = QRBand2AfterPrint
      AlignToBottom = falsch
      BeforePrint = QRBand2BeforePrint
      Farbe = clWhite
      TransparentBand = falsch
      ForceNewColumn = falsch
      ForceNewPage = falsch
      Size.Values = (
        105.833333333333300000
        1899.708333333333000000)
      PreCaluculateBandHeight = falsch
      KeepOnOnePage = falsch
      BandType = rbDetail
      Gegenstand QRDBText1: TQRDBText
        Links = 18
        Oberseite = 12
        Breite = 44
        Höhe = 17
        Frame.Color = clBlack
        Frame.DrawTop = falsch
        Frame.DrawBottom = falsch
        Frame.DrawLeft = falsch
        Frame.DrawRight = falsch
        Size.Values = (
          44.979166666666670000
          47.625000000000000000
          31.750000000000000000
          116.416666666666700000)
        Ausrichtung = taLeftJustify
        AlignToBand = falsch
        AutoSize = richten aus
        AutoStretch = falsch
        Farbe = clWhite
        Datensatz = Table1
        DataField = „CustNo“
        Transparent = falsch
        Zeilenumbruch = richten aus
        FontSize = 10
      Ende
      Gegenstand QRDBText2: TQRDBText
        Links = 104
        Oberseite = 12
        Breite = 56
        Höhe = 17
        Frame.Color = clBlack
        Frame.DrawTop = falsch
        Frame.DrawBottom = falsch
        Frame.DrawLeft = falsch
        Frame.DrawRight = falsch
        Size.Values = (
          44.979166666666670000
          275.166666666666700000
          31.750000000000000000
          148.166666666666700000)
        Ausrichtung = taLeftJustify
        AlignToBand = falsch
        AutoSize = richten aus
        AutoStretch = falsch
        Farbe = clWhite
        Datensatz = Table1
        DataField = „Firma“
        Transparent = falsch
        Zeilenumbruch = richten aus
        FontSize = 10
      Ende
      Gegenstand QRDBText3: TQRDBText
        Links = 454
        Oberseite = 11
        Breite = 24
        Höhe = 17
        Frame.Color = clBlack
        Frame.DrawTop = falsch
        Frame.DrawBottom = falsch
        Frame.DrawLeft = falsch
        Frame.DrawRight = falsch
        Size.Values = (
          44.979166666666670000
          1201.208333333333000000
          29.104166666666670000
          63.500000000000000000)
        Ausrichtung = taLeftJustify
        AlignToBand = falsch
        AutoSize = richten aus
        AutoStretch = falsch
        Farbe = clWhite
        Datensatz = Table1
        DataField = „Stadt“
        Transparent = falsch
        Zeilenumbruch = richten aus
        FontSize = 10
      Ende
    Ende
  Ende
  Gegenstand Button1: TButton
    Links = 10
    Oberseite = 12
    Breite = 75
    Höhe = 25
    Untertitel = „Button1“
    TabOrder = 1
    OnClick = Button1Click
  Ende
  Gegenstand Table1: TTable
    Active = richten aus
    DatabaseName = „DBDEMOS“
    TableName = „customer.db“
    Links = 228
    Oberseite = 120
  Ende
Ende
Weitere Lösungen  
 
programming4us programming4us