Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
App. WinForms / WPF .NET
Importare dati da un file txt in visual studio 2008
sabato 12 dicembre 2009 - 13.49
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
Mau67
Profilo
| Expert
917
messaggi | Data Invio:
sab 12 dic 2009 - 13:49
Ciao al forum, ho il seguente probema, devo caricare dei dati in tabelle access da visual studio 2008, ho provato e riprovato ma non riesco.
Quando usavo le tabelle in SQLServer 2005 usavo le store procedure
Vi allego il codice che usavo
Private Sub ImportToDB(ByVal ConnString As String)
If Not File.Exists(FILE_NAME) Then
MsgBox(FILE_NAME & " Stringa di connessione mancante.")
Return
End If
Dim sr As StreamReader = File.OpenText(FILE_NAME)
Dim sqlString As String
sqlString = sr.ReadLine()
Me.ToolStripStatusLabel2.Text = (sqlString) 'Questo è solo per verificare!
sr.Close()
Dim objConnection As New SqlConnection(sqlString)
' apro la connessione
objConnection.Open()
Using objCmd As New SqlCommand("dbo.proc_BancaUpsert", objConnection)
' tipo stored procedure
objCmd.CommandType = CommandType.StoredProcedure
' ciclo il file
While Not fileInput.EndOfStream
Dim Row As MyRow = Me.GetRow(fileInput.ReadLine())
' genero il comando
' assegno i parametri alla stored procedure
objCmd.Parameters.Add("@Abi", SqlDbType.VarChar, 5).Value = Row.Abi
objCmd.Parameters.Add("@Banca", SqlDbType.VarChar, 50).Value = Row.Banca
objCmd.Parameters.Add("@Cab", SqlDbType.VarChar, 5).Value = Row.Cab
objCmd.Parameters.Add("@Agenzia", SqlDbType.VarChar, 50).Value = Row.Agenzia
objCmd.Parameters.Add("@IndirizzoBanca", SqlDbType.VarChar, 50).Value = Row.IndirizzoBanca
objCmd.Parameters.Add("@Città", SqlDbType.VarChar, 50).Value = Row.Città
objCmd.Parameters.Add("@CapBanca", SqlDbType.VarChar, 5).Value = Row.CapBanca
objCmd.Parameters.Add("@ProvBanca", SqlDbType.VarChar, 5).Value = Row.ProvBanca
objCmd.Parameters.Add("@DataAgg", SqlDbType.SmallDateTime).Value = Row.DataAgg
' eseguo il comando
objCmd.ExecuteNonQuery()
' pulisco la collezione dei parametri
objCmd.Parameters.Clear()
End While
End Using
objConnection.Close()
End Sub
Invece nelle tabelle accessecome faccio ad importare i dati?
Grazie in anticipo
Mau67
alexmed
Profilo
| Guru
1.186
messaggi | Data Invio:
sab 12 dic 2009 - 21:01
Ciao Mau,
Dovrebbe essere sufficiente sostituire il suffisso Sql con OleDb.
Ad esempio:
Dim objConnection As New SqlConnection(sqlString)
diventa
Dim objConnection As New OleDbConnection(OleDbString)
quindi anche i parametri saranno:
objCmd.Parameters.Add("@Abi", OleDbType.VarChar, 5).Value = Row.Abi
oltre naturalmente a cambiare la stringa di connessione al Database
Private OleDbString As String = "Provider=Microsoft.Jet.OLEDB.4.0 Data Source=C:\Database.mdb;"
Ti rimando a questo link per un esempio:
http://www.java2s.com/Code/VB/Database-ADO.net/PassParametersintoStoreProcedure.htm
Ciao
alexmed
Torna su
Stanze Forum
Elenco Threads
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?
Dopo esserti registrato potrai chiedere
aiuto sul nostro
Forum
oppure aiutare gli altri
Consulta le
Stanze
disponibili.
Registrati ora !