15-10-22, 04:19 PM
(آخر تعديل لهذه المشاركة : 15-10-22, 04:38 PM {2} بواسطة ali_ahmed12.)
(15-10-22, 04:12 PM)Meen2 كتب :الله يرحم والديك ممكن تحويل كود استدعاء(15-10-22, 03:45 PM)ali_ahmed12 كتب : السلام عليكم ممكن تحويل دالة مكتوبه فيجوال بيسك الي سي شارب
كود :
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
كود :
public int CODE_GENE(string TABLE_NAME, string COLUMN_NAME) {
int CODE = 0;
DataTable DT = new DataTable();
SqlDataAdapter DA = new SqlDataAdapter(String.Format("SELECT {1} FROM {0} ORDER BY{1}", TABLE_NAME, COLUMN_NAME), sqlcon);
DA.Fill(DT);
if (DT.Rows.Count > 0) {
int I = DT.Rows.Count - 1;
CODE = Convert.ToInt32(DT.Rows[I][COLUMN_NAME]);
}
return CODE;
}
كود :
TXT_CODE.Text = Format(CODE_GENE("ITEMS", "ID") + 1, "CUS0000000")