Questione : cambiare l'operazione sched pw via la linea di ordine

Ho una lista del lavoro (operazione) nel programmatore che richiede per cambiare il pw ogni 30 giorni.  ciò si trasforma in in dolore del collo affinchè ogni 30 giorni passi con ciascuno, scatta la proprietà, ha ripristinato la parola d'accesso. ed allora apply.

I sanno ci è un programma nel sistema chiamato “schtasks„ che permettono che me elenchi tutta l'operazione ho,
also può cambiare il pw via le linee di ordine.  e posso trovare il mio nome di sistema da typing
hostname nella linea di ordine, per esempio nome di VSRV1

current:  run_1, funzionamenti sotto VSRV! \ ABC dove il ABC è il name
current pw dell'utente:      pw1
new pw alla risistemazione allo synax di pw2

the dell'esempio dice: il

schtasks /CHANGE /tn run_1 /S VSRV1 /RP pw2
and che ottengo risponde:  “l'accesso è negato " il

can che qualcuno lo aiuta specific come dovrebbe io fare per fare i cambiamenti di pw via sopra?

thanks


 class= del

Risposta : cambiare l'operazione sched pw via la linea di ordine

Il mio campione semplice

Generare un contatore.
In qrband.beforeprint inc il contatore
Nel controllo di qrband.afterprint il contatore e se è come forza necessaria una nuova pagina.

Vedere l'esempio di codice

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:
36:
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:

unità Unit1;

interfaccia

usi
  Windows, messaggi, SysUtils, varianti, codici categoria, grafici, comandi, forme,
  Dialoghi, StdCtrls, QuickRpt, QRCtrls, ExtCtrls, DB, DBTables;

tipo
  TForm1 = codice categoria (TForm)
    Table1: TTable;
    QuickRep1: TQuickRep;
    QRBand2: TQRBand;
    QRDBText1: TQRDBText;
    QRDBText2: TQRDBText;
    QRDBText3: TQRDBText;
    Button1: TButton;
    procedura Button1Click (mittente: TObject);
    procedura QRBand2BeforePrint (mittente: TQRCustomBand; varietà PrintBand: Booleano);
    procedura QRBand2AfterPrint (mittente: TQRCustomBand; BandPrinted: Booleano);
  riservato
    {Dichiarazioni riservate}
  pubblico
    {Dichiarazioni pubbliche}
  estremità;

varietà
  Form1: TForm1;
  i: Numero intero;

esecuzione

{$R *.dfm}

procedura TForm1.Button1Click (mittente: TObject);
cominciare
  i: = 0;
  QuickRep1.Preview;
estremità;

procedura TForm1.QRBand2AfterPrint (mittente: TQRCustomBand; BandPrinted: Booleano);
cominciare
  se MOD 5 = 0 di i allora
    QuickRep1.NewPage;
estremità;

procedura TForm1.QRBand2BeforePrint (mittente: TQRCustomBand; varietà PrintBand: Booleano);
cominciare
  Inc (i);
estremità;

estremità.


la forma

oggetto Form1: TForm1
  Parte di sinistra = 245
  Parte superiore = 92
  Titolo = “Form1„
  ClientHeight = 464
  ClientWidth = 854
  Colore = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = “Tahoma„
  Font.Style = []
  OldCreateOrder = falso
  Regolato = falso
  PixelsPerInch = 96
  TextHeight = 13
  oggetto QuickRep1: TQuickRep
    Parte di sinistra = 76
    Parte superiore = 54
    Larghezza = 794
    Altezza = 1123
    Frame.Color = clBlack
    Frame.DrawTop = falso
    Frame.DrawBottom = falso
    Frame.DrawLeft = falso
    Frame.DrawRight = falso
    Gruppo di dati = 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)
    Opzioni = [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 = automobile
    PrinterSettings.Duplex = falso
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.UseStandardprinter = falso
    PrinterSettings.UseCustomBinCode = falso
    PrinterSettings.CustomBinCode = 0
    PrinterSettings.ExtendedDuplex = 0
    PrinterSettings.UseCustomPaperCode = falso
    PrinterSettings.CustomPaperCode = 0
    PrinterSettings.PrintMetaFile = falso
    PrinterSettings.PrintQuality = 0
    PrinterSettings.Collate = 0
    PrinterSettings.ColorOption = 0
    PrintIfEmpty = allinea
    SnapToGrid = allinea
    Unità = millimetro
    Zoom = 100
    PrevFormStyle = fsNormal
    PreviewInitialState = wsNormal
    PrevInitialZoom = qrZoomToFit
    oggetto QRBand2: TQRBand
      Parte di sinistra = 38
      Parte superiore = 38
      Larghezza = 718
      Altezza = 40
      Frame.Color = clBlack
      Frame.DrawTop = falso
      Frame.DrawBottom = falso
      Frame.DrawLeft = falso
      Frame.DrawRight = falso
      AfterPrint = QRBand2AfterPrint
      AlignToBottom = falso
      BeforePrint = QRBand2BeforePrint
      Colore = clWhite
      TransparentBand = falso
      ForceNewColumn = falso
      ForceNewPage = falso
      Size.Values = (
        105.833333333333300000
        1899.708333333333000000)
      PreCaluculateBandHeight = falso
      KeepOnOnePage = falso
      A banda = rbDetail
      oggetto QRDBText1: TQRDBText
        Parte di sinistra = 18
        Parte superiore = 12
        Larghezza = 44
        Altezza = 17
        Frame.Color = clBlack
        Frame.DrawTop = falso
        Frame.DrawBottom = falso
        Frame.DrawLeft = falso
        Frame.DrawRight = falso
        Size.Values = (
          44.979166666666670000
          47.625000000000000000
          31.750000000000000000
          116.416666666666700000)
        L'allineamento = taLeftJustify
        AlignToBand = falso
        AutoSize = allinea
        AutoStretch = falso
        Colore = clWhite
        Gruppo di dati = Table1
        DataField = “CustNo„
        Trasparente = falso
        Il WordWrap = allinea
        FontSize = 10
      estremità
      oggetto QRDBText2: TQRDBText
        Parte di sinistra = 104
        Parte superiore = 12
        Larghezza = 56
        Altezza = 17
        Frame.Color = clBlack
        Frame.DrawTop = falso
        Frame.DrawBottom = falso
        Frame.DrawLeft = falso
        Frame.DrawRight = falso
        Size.Values = (
          44.979166666666670000
          275.166666666666700000
          31.750000000000000000
          148.166666666666700000)
        L'allineamento = taLeftJustify
        AlignToBand = falso
        AutoSize = allinea
        AutoStretch = falso
        Colore = clWhite
        Gruppo di dati = Table1
        DataField = “azienda„
        Trasparente = falso
        Il WordWrap = allinea
        FontSize = 10
      estremità
      oggetto QRDBText3: TQRDBText
        Parte di sinistra = 454
        Parte superiore = 11
        Larghezza = 24
        Altezza = 17
        Frame.Color = clBlack
        Frame.DrawTop = falso
        Frame.DrawBottom = falso
        Frame.DrawLeft = falso
        Frame.DrawRight = falso
        Size.Values = (
          44.979166666666670000
          1201.208333333333000000
          29.104166666666670000
          63.500000000000000000)
        L'allineamento = taLeftJustify
        AlignToBand = falso
        AutoSize = allinea
        AutoStretch = falso
        Colore = clWhite
        Gruppo di dati = Table1
        DataField = “città„
        Trasparente = falso
        Il WordWrap = allinea
        FontSize = 10
      estremità
    estremità
  estremità
  oggetto Button1: TButton
    Parte di sinistra = 10
    Parte superiore = 12
    Larghezza = 75
    Altezza = 25
    Titolo = “Button1„
    TabOrder = 1
    OnClick = Button1Click
  estremità
  oggetto Table1: TTable
    Il Active = allinea
    DatabaseName = “DBDEMOS„
    TableName = “customer.db„
    Parte di sinistra = 228
    Parte superiore = 120
  estremità
estremità
Altre soluzioni  
 
programming4us programming4us