Thursday, May 26, 2011

Add Row in datatable

din dt as new datatable

Dim dr = dt.NewRow
dr.Item("NAME1") = dt.Rows(i)("NAME").ToString()
dr.Item("DESIGNATION1") = dt.Rows(i)("DESIGNATION").ToString()
dr.Item("COMPANY1") = dt.Rows(i)("COMPANY").ToString()
dr.Item("ADDRESS_11") = dt.Rows(i)("ADDRESS_1").ToString()
dr.Item("CITY1") = dt.Rows(i)("CITY").ToString()
dr.Item("PINCODE1") = dt.Rows(i)("PINCODE").ToString()
dr.Item("PHONE1") = dt.Rows(i)("PHONE").ToString()
dr.Item("MOBILE1") = dt.Rows(i)("MOBILE").ToString()
dr.Item("EMAIL1") = dt.Rows(i)("EMAIL").ToString()
dt.Rows.Add(dr)

No comments:

Post a Comment