15-10-22, 03:45 PM
السلام عليكم ممكن تحويل دالة مكتوبه فيجوال بيسك الي سي شارب
كود :
Public Function CODE_GENE(TABLENAME, ID_) As Integer
CODE_GENE = 0
Dim DT As New DataTable
Dim DA As New SqlDataAdapter("select *from " & TABLENAME & " ORDER BY " & ID_ & "", sqlcon)
DA.Fill(DT)
If DT.Rows.Count <> 0 Then
Dim I = DT.Rows.Count - 1
CODE_GENE = Val(DT.Rows(I).Item(ID_))
End If
End Function