aras_ir
یک شنبه 17 خرداد 1388, 15:11 عصر
سلام
برنامه ای نوشتم که اطلاعات رو از فایل excel دریافت میکنه و در GridView نمایش میده میخوام این اطلاعات رو توی یه Table در SQL بریزم
اگر کمک کنید ممنون میشم
aras_ir
یک شنبه 17 خرداد 1388, 17:14 عصر
خودم پیداش کردم
Dim constr = "PROVIDER=MICROSOFT.JET.OLEDB.4.0; EXTENDED PROPERTIES=EXCEL 8.0; DATA SOURCE= "conStr += "C:\Excel.xlsx; "
Dim xlcon As New OleDbConnection(constr)
xlcon.Open()
Dim cmd As New OleDbCommand("Select * from [sheet1$]", xlcon)
Dim dr As OleDbDataReader = cmd.ExecuteReader()
Dim sqlcon As New SqlConnection("Data Source=(local);Initial Catalog=[Database_Name];Integrated Security=SSPI")
sqlcon.Open()
While dr.Read
Dim cmd2 As New SqlCommand("INSERT INTO Table_Name(Column_Name) VALUES('" + dr.Item(0).ToString() + "')", sqlcon)
cmd2.ExecuteNonQuery()
End While
امیدوارم خوب باشه
اگر موردی داره از برنامه نویسان عزیز خواهشمندم راهنمایی کنید
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.