ScriptObjectModel.Events Properti
Definisi
Penting
Beberapa informasi terkait produk prarilis yang dapat diubah secara signifikan sebelum dirilis. Microsoft tidak memberikan jaminan, tersirat maupun tersurat, sehubungan dengan informasi yang diberikan di sini.
Mengembalikan IDTSComponentEvents kumpulan peristiwa yang sudah ada yang ditentukan dalam paket yang berisi tugas Skrip.
public:
property Microsoft::SqlServer::Dts::Tasks::ScriptTask::EventsObjectWrapper ^ Events { Microsoft::SqlServer::Dts::Tasks::ScriptTask::EventsObjectWrapper ^ get(); };
public Microsoft.SqlServer.Dts.Tasks.ScriptTask.EventsObjectWrapper Events { get; }
member this.Events : Microsoft.SqlServer.Dts.Tasks.ScriptTask.EventsObjectWrapper
Public ReadOnly Property Events As EventsObjectWrapper
Nilai Properti
Kumpulan IDTSComponentEvents peristiwa yang ada yang ditentukan dalam paket yang berisi tugas Skrip.
Contoh
Sampel kode berikut untuk digunakan di dalam tugas Skrip menunjukkan cara meningkatkan peristiwa dari dalam tugas Skrip. Contohnya menggunakan fungsi Windows API asli untuk menentukan apakah koneksi Internet tersedia. Jika tidak ada koneksi yang tersedia, koneksi akan menimbulkan kesalahan. Jika koneksi modem yang berpotensi volatil sedang digunakan, contohnya akan memunculkan peringatan. Jika tidak, ia mengembalikan pesan informasi bahwa koneksi Internet telah terdeteksi.
Private Declare Function InternetGetConnectedState Lib "wininet" _
(ByRef dwFlags As Long, ByVal dwReserved As Long) As Long
Private Enum ConnectedStates
LAN = &H2
Modem = &H1
Proxy = &H4
Offline = &H20
Configured = &H40
RasInstalled = &H10
End Enum
Public Sub Main()
Dim dwFlags As Long
Dim connectedState As Long
connectedState = InternetGetConnectedState(dwFlags, 0)
If connectedState <> 0 Then
If (dwFlags And ConnectedStates.Modem) = ConnectedStates.Modem Then
Dts.Events.FireWarning(0, "Script Task Example", _
"Volatile Internet connection detected.", String.Empty, 0)
Else
Dts.Events.FireInformation(0, "Script Task Example", _
"Internet connection detected.", String.Empty, 0, False)
End If
Else
' If not connected to the Internet, raise an error.
Dts.Events.FireError(0, "Script Task Example", _
"Internet connection not available.", String.Empty, 0)
End If
Dts.TaskResult = ScriptResults.Success
End Sub
Keterangan
Events Gunakan properti Dts
objek dalam kode tugas Skrip untuk memunculkan kesalahan, peringatan, dan pesan informasi.