Metode Installer.LastErrorRecord

Metode LastErrorRecord dari objek Penginstal mengembalikan objek Rekaman yang berisi parameter kesalahan untuk kesalahan terbaru dari fungsi yang menghasilkan rekaman kesalahan.

Sintaks

Installer.LastErrorRecord()

Parameter

Metode ini tidak memiliki parameter.

Nilai kembali

Metode ini tidak mengembalikan nilai.

Keterangan

Objek Rekam diatur ulang setelah eksekusi fungsi ini dari fungsi apa pun yang menghasilkan rekaman kesalahan.

Hanya fungsi yang ditunjuk berikut yang menghasilkan rekaman kesalahan:

• Metode OpenDatabase (Objek Penginstal)
• Melakukan
• OpenView
• Impor
• Ekspor
• Gabung
• HasilkanTransform
• ApplyTransform
• Menjalankan
• Memodifikasi
• SetStream
• RingkasanInformasi
• SourcePath
• TargetPath
• ComponentCurrentState
• ComponentRequestState
• FeatureCurrentState
• FeatureRequestState
• FeatureCost
• FeatureValidStates
• SetInstallLevel

Sampel berikut dalam VBScript menggunakan panggilan ke OpenDatabase untuk menunjukkan cara mendapatkan informasi kesalahan yang diperluas dari salah satu metode atau properti yang mendukung metode LastErrorRecord . Sampel membuat pesan kesalahan saat metode OpenDatabase gagal. Objek Err digunakan untuk menentukan apakah terjadi kesalahan.

Const msiOpenDatabaseModeReadOnly     = 0

On Error Resume Next ' defer error handling

Dim installer
Set installer = CreateObject("WindowsInstaller.Installer")

' attempt to open the non-existent MSI database
Dim database
Set database = installer.OpenDatabase("c:\nonexistent.msi", msiOpenDatabaseModeReadOnly)

' test for error
If Err.Number <> 0 Then
    Dim message, errorRec
    message = Err.Source & " " & Hex(Err.Number) & ": " & Err.Description
    If Not installer Is Nothing Then
        ' try to obtain extended error info
        Set errorRec = installer.LastErrorRecord
        If Not errorRec Is Nothing Then message = message & vbNewLine & errorRec.FormatText
    End If

    MsgBox message

    ' PLACE ADDITIONAL SCRIPTING CODE HERE TO LOG AND/OR DISPLAY THE MESSAGE AND
    ' DETERMINE WHETHER TO CONTINUE PROCESSING ANYTHING ELSE
End If

Persyaratan