So speichern Sie eine Datei mit Passwort in UFT

Question

Ich verwende UFT 12.5. Während der Laufzeit öffnet es Excel und Word. Dann schreibt es einige Daten in beide Dateien. Danach möchte ich beide Dateien unter einem neuen Namen speichern und dann passwortgeschützt. Ich muss das Passwort manuell eingeben können, um es zu öffnen. Bisher habe ich den untenstehenden Code geschrieben und bekomme in der letzten Zeile einen Fehler.

Bitte beraten Sie, wie ich Word und Excel-Dateien mit einem Passwort mit UFT speichern kann.

Danke.

Answer 1

Sie müssen die richtigen Parameter mit SaveAs Methode übergeben. Überprüfen Sie this Link für weitere Informationen.
Hier ist der Arbeitscode ist, können Sie versuchen:

file = "File path with file name" 
newfile = "File path with new file name" 

Set ExcelObj = createobject("excel.application") 
ExcelObj.Visible = true 

Set ExcelFile = ExcelObj.Workbooks.Open (file) 
Set ScripSheet = ExcelFile.Worksheets("Scripts") 
ScripSheet.Cells(1,1) = "Passed" 
ExcelFile.SaveAs newfile, , "test" 
ExcelFile.Close 
ExcelObj.Quit 

UPDATE
Per Kommentare von OP

Wenn Sie Datei mit ReadOnly speichern möchten, müssen Sie WriteResPassword verwenden Parameter auf diese Weise:

ExcelFile.SaveAs newfile, , , "test" 

Bitte beachte, dass ich habe zwei leere Parameter für FileFormat und Password sind.

diese Weise ist es für Passwort fragen wird die Datei im Schreibmodus zu öffnen, und wenn Sie das Passwort nicht angeben werden, wird Datei in ReadOnly Modus geöffnet werden.

Überprüfen Sie den Link, den ich erwähnt habe.