อยากได้ตัวอย่างโค้ด import file csv เข้า database ครับ (ms sql)
อยากได้ตัวอย่างโค้ด import file csv เข้า database ครับ (ms sql) พอจะมีตัวอย่างมั้ยครับ ผมหาใน google ของต่างประเทศก็มีแบบสั้นๆ อ่านค่าเฉยๆ อยากศึกษาแบบ อ่านค่าแล้วinsert ลงฐานข้อมูลด้วยครับ ขอบคุณครับ :Q:Q:Q:Q ตัวอย่างๆค้าบบบ ท่านผู้มีอุปการะคุณ แก้ไขครั้งสุดท้ายโดย nana07 เมื่อ 2019-5-17 11:11ลองดูครับ
Imports System.Data
Imports System.IO
Public Class frmMain
Private Sub btnBrowse_Click(sender As Object, e As EventArgs) Handles btnBrowse.Click
Dim dlg As OpenFileDialog = New OpenFileDialog()
If dlg.ShowDialog() = DialogResult.OK Then
txtFilePath.Text = dlg.FileName
Call OnReadFileCSV()
End If
End Sub
Private Sub OnReadFileCSV()
Try
Dim rd As New StreamReader(txtFilePath.Text)
Dim sTexts() As String
While Not rd.EndOfStream
sTexts = rd.ReadLine().Split(","c)
Dim sUserCode As String = sTexts(0).Trim()
Dim sUserName As String = sTexts(1).Trim()
Dim sLastName As String = sTexts(2).Trim
'------------ บันทึกข้อมูลตรงนี้ ---------------
' insert into table_name(UserCode,UserName,LastName) Value (sUserCode, sUserName, sLastName)
'-----------------------------------------
End While
Catch ex As Exception
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
End Class
ใช้กับ VB6 ได้ป่ะครับท่าน คล้ายๆกันเนอะ ขอบคุณครับ
หน้า:
[1]