2011-11-10 24 views
1

在Web應用程序中,我想將XML文件內容插入到訪問數據庫中,我得到了代碼(下面),但是此行有錯誤在將XML文件內容插入訪問數據庫期間出現錯誤

xmlFile = XmlReader.Create("Product.xml", New XmlReaderSettings()) 

這個錯誤出現

enter image description here

請看看下面的代碼,並告訴我如何修改來從Web應用程序根文件夾中的「product.xml」。我試圖 「〜/ product.xml」 並沒有奏效

Imports Microsoft.VisualBasic 
Imports System.Xml 

Imports System.Data.OleDb 
Imports System.Data 

Public Class Form1 

    Public Shared Sub mimi() 

    Dim connetionString As String 

    Dim connection As OleDbConnection 

    Dim command As OleDbCommand 

    Dim ds As New DataSet 

    Dim xmlFile As XmlReader 

    Dim sql As String 
    Dim adpter As New OleDbDataAdapter 




    Dim product_ID As Integer 

    Dim Product_Name As String 

    Dim product_Price As Double 



    connetionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= |datadirectory|CRF.mdb;Persist Security Info=True" 

    connection = New OleDbConnection(connetionString) 



    xmlFile = XmlReader.Create("Product.xml", New XmlReaderSettings()) 

    ds.ReadXml(xmlFile) 

    Dim i As Integer 

    connection.Open() 

    For i = 0 To ds.Tables(0).Rows.Count - 1 

     product_ID = Convert.ToInt32(ds.Tables(0).Rows(i).Item(0)) 

     Product_Name = ds.Tables(0).Rows(i).Item(1) 

     product_Price = Convert.ToDouble(ds.Tables(0).Rows(i).Item(2)) 

     sql = "insert into Product values(" & product_ID & ",'" & Product_Name & "'," & product_Price & ")" 

     command = New OleDbCommand(sql, connection) 

     adpter.InsertCommand = command 

     adpter.InsertCommand.ExecuteNonQuery() 

    Next 

    connection.Close() 

End Sub 

End Class 

回答

1

嘗試使用HttpContext.Current.Server.MapPath( 「〜/ Product.xml」)

相關問題