Unable to store data in MS SQL Express Db

I develop in Access VBA and am learning VB in Visual Studio.  I am trying to create a very simple web page where a user enters some data and it gets stored in a table in SQL Server Express.  I can't get the latter part to work.

I'm getting the following error:

Unable to open the physical file "C:\WebSites\IOC\App_Data\IOC_Data.mdf". Operating system error 32: "32(The process cannot access the file because it is being used by another process.)".
Unable to open the physical file "C:\WebSites\IOC\App_Data\IOC_Data_log.ldf". Operating system error 32: "32(The process cannot access the file because it is being used by another process.)".
Cannot open database "IOC_Data" requested by the login. The login failed.
Login failed for user 'DELL5150\Al'.
File activation failure. The physical file name "C:\WebSites\IOC\App_Data\IOC_Data_log.ldf" may be incorrect.

From the line below:         mySqlDataAdapter.Fill(myDataSet, "tblIOC_Data")

'-----------------------------------------------------------
 ' Create a new Connection and SqlDataAdapter
        Dim myConnection As Data.SqlClient.SqlConnection
        Dim mySqlDataAdapter As Data.SqlClient.SqlDataAdapter

        myConnection = New Data.SqlClient.SqlConnection("Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=IOC_Data;Data Source=DELL5150\SQLEXPRESS")
        mySqlDataAdapter = New Data.SqlClient.SqlDataAdapter("Select * from tblIOC_Data", myConnection)

        Dim myDataSet As Data.DataSet = New Data.DataSet()
        Dim myDataRow As Data.DataRow

        Dim myDataRowsCommandBuilder As Data.SqlClient.SqlCommandBuilder = New Data.SqlClient.SqlCommandBuilder(mySqlDataAdapter)

        mySqlDataAdapter.Fill(myDataSet, "tblIOC_Data")

        myDataRow = myDataSet.Tables("tblIOC_Data").NewRow()
        myDataRow("IOC_ID") = 1
        myDataRow("DateEntered") = txtDate.Text
        myDataRow("DiningCenter") = cboDiningCenter.Text
        myDataRow("DC_Coordinator") = txtDC_Coordinator.Text

        myDataSet.Tables("tblIOC_Data").Rows.Add(myDataRow)

Any help is greatly appreciated.
Thank you.Start Free Trial