[Visual Basic] Public Function Check_Vertragstyp_Fuer_Lizenz( _
ByVal Vertragstypnr As Integer _
) As Boolean
[Visual Basic] Public Function Check_Vertragstyp_Fuer_Lizenz(ByVal Vertragstypnr As Integer) As Boolean
Dim vertragstyp As New TKB.VV.DB.clsVertragstyp
vertragstyp.cpMainConnectionProvider = Globals.conn
vertragstyp.iVertragstypnr = New SqlInt32(CType(Vertragstypnr, Int32))
vertragstyp.SelectOne()
If vertragstyp.bAlsLizenz.Value = True Then Return True Else Return False
End Function
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