none
如何將txt文本轉入到sql(請使用VB2005) RRS feed

解答

  • :::試試看:

            Dim fs As New System.IO.FileStream("文字檔檔名", FileMode.Open)
            Dim sr As New System.IO.StreamReader(fs, System.Text.Encoding.Default)
            Dim s As String

            Do While sr.Peek > -1
                s = sr.ReadLine
            Loop
            sr.Close()
            fs.Close()

    寫到資料庫的方式VB6和VB.net不太一樣喔!!!

     

    2006年10月19日 上午 02:10

所有回覆

  • :::

    1.先開啟文字檔

    2.假如用離線的方式的話,建立Sqlconnection,SqlCommand,SqlDataAdapter,

    SqlcommandBuilder,將SqlDataAdapter Fill到DataSet(變數名稱為ds)裡

    3.讀取文字檔裡每一行資料,再利用Split存至陣列裡

    4.將陣列裡的資料放入ds.Table("資料表")裡

    5.完全將文字檔裡面的資料都讀寫到ds.Table("資料表")之後,便Update回資

    料庫!!!

    2006年10月19日 上午 01:33
  • 寫入sql這個並不難,問題我想使用 

            OpenFileDialog1.ShowDialog()
            Dim str As String
            Dim x
            Dim y As String
            y = OpenFileDialog1.FileName
            Open y For Input As #1
            While Not EOF(1)
                x = DoEvents
                Line Input #1, str
            End While
        Close #1

    方式打開,可是系統提示錯誤:

    錯誤 1 'Open' 未宣告。檔案 I/O 功能可以在 'Microsoft.VisualBasic' 命名空間中使用。

    錯誤 2 方法引數必須放在括號之中。 

    錯誤 3 必須是逗號、')' 或有效的運算式接續符號。 

    錯誤 4 名稱 'DoEvents' 未宣告。 

    錯誤 5 不再支援 'Line' 陳述式。檔案 I/O 功能由 'Microsoft.VisualBasic.FileSystem.LineInput' 取代,而圖形功能由 'System.Drawing.Graphics.DrawLine' 取代。

    錯誤 6 方法引數必須放在括號之中。

    2006年10月19日 上午 01:42
  • :::試試看:

            Dim fs As New System.IO.FileStream("文字檔檔名", FileMode.Open)
            Dim sr As New System.IO.StreamReader(fs, System.Text.Encoding.Default)
            Dim s As String

            Do While sr.Peek > -1
                s = sr.ReadLine
            Loop
            sr.Close()
            fs.Close()

    寫到資料庫的方式VB6和VB.net不太一樣喔!!!

     

    2006年10月19日 上午 02:10
  • 以往VB6的作法,到了.Net已經有了改變

    錯誤訊息已經說的滿清楚的了;檔案存取請參考

    http://msdn.microsoft.com/library/cht/default.asp?url=/library/CHT/cpref/html/frlrfsystemiostreamreaderclassreadlinetopic.asp

    而DoEvent到了.Net是變成Application.Doevents

    2006年10月19日 上午 02:10
    版主
  • 可是系統提示FileMode未宣告
    2006年10月19日 上午 02:32
  • imports System.IO
    2006年10月19日 上午 02:43
  • 你把 VB6 的語法直接拿到 VBNET 來用了...

    台灣 MSDN 網站上這本免費電子書建議先看一遍:

    《將 Microsoft Visual Basic 6.0 升級至 Microsoft Visual Basic .NET》是將 Visual Basic 6 應用程式升級至 Visual Basic .NET 的完整技術指南,涵蓋由 APIs 到 ZOrders 等所有的升級主題

    2006年10月19日 上午 06:54
    版主