Hallo zusammen!
Ich schaue mir diesen Code schon die ganze Zeit durch und der SQL - String stimmt auch (habe die Abfrage auch schon manuell gemacht), doch ich weiss einfach nicht wo ich einen Fehler mache.
Der Fehler erscheint in der Zeile: If oRdr.Read() Then
Kann mir vielleicht jemand helfen?
Freundliche Grüsse
Shivan
Ich schaue mir diesen Code schon die ganze Zeit durch und der SQL - String stimmt auch (habe die Abfrage auch schon manuell gemacht), doch ich weiss einfach nicht wo ich einen Fehler mache.
PHP Code:
Private Function CheckMitNameAlredyExists(ByVal iPersID As Integer)
Dim oCmd As SqlClient.SqlCommand
Dim sSQL As String = ""
Dim oRdr As SqlClient.SqlDataReader
Try
sSQL = " SELECT MitName, MitVorname " & _
" FROM t_Mitarbeiter " & _
" WHERE MitPersID = {0} "
sSQL = String.Format(sSQL, iPersID)
oCmd = g_oApp.ConnectionAppl.CreateCommand
oCmd.CommandText = sSQL
oCmd.ExecuteReader()
If oRdr.Read() Then
If oRdr.GetValue(0) Is DBNull.Value Or oRdr.GetValue(1) Is DBNull.Value Then
Return False
End If
If oRdr.GetValue(0) Is String.Empty Or oRdr.GetValue(1) Is String.Empty Then
Return False
End If
Return True
End If
Catch ex As Exception
MsgBox(ex)
Finally
'Reader schliessen
Afi.GlobalFunctions.CloseDataReader(oRdr)
End Try
End Function
Kann mir vielleicht jemand helfen?
Freundliche Grüsse
Shivan
Comment