Applikation lesen

[Visual Basic]
Public Sub Get_Applikation( _ 
   ByVal nr As Integer _ 
)

Parameter

nr

Quellcode

[Visual Basic]
        Public Sub Get_Applikation(ByVal nr As Integer) 
            Me.cpMainConnectionProvider = Globals.conn 
            Me.iApplikationNr = New SqlInt32(CType(nr, Int32)) 
            Globals.conn.OpenConnection() 
            Me.daten = Me.SelectOne() 
            Applikation_Installationtyp.cpMainConnectionProvider = Globals.conn 
            Applikation_Installationtyp.iApplikationNr = New SqlInt32(CType(nr, Int32)) 
            ApplikationInstallationTyp = Applikation_Installationtyp.SelectAllWApplikationNrLogic 
 
            Applikation_Installationals.cpMainConnectionProvider = Globals.conn 
            Applikation_Installationals.iApplikationNr = New SqlInt32(CType(nr, Int32)) 
            ApplikationInstallationals = Applikation_Installationals.SelectAllWApplikationNrLogic 
 
            Applikation_InstallationFuer.cpMainConnectionProvider = Globals.conn 
            Applikation_InstallationFuer.iApplikationNr = New SqlInt32(CType(nr, Int32)) 
            applikationinstallationfuer = Applikation_InstallationFuer.SelectAllWApplikationNrLogic 
            Globals.conn.CloseConnection(True) 
        End Sub

Forderungen

Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition

Siehe auch

clsApplikation