Problema Funzione Insert SQL

giovedì 20 febbraio 2014 - 17.54
Tag Elenco Tags  VB.NET  |  .NET 4.0  |  Windows Vista  |  Visual Studio 2010  |  Access (.mdb)

giucorn Profilo | Junior Member

Ciao a tutti, devo inserire il contenuto di un database in un altro database. il problema che il database ha la password e nn riesco a creare la sintassi.

Ho Provato questa sintassi:
query_Ins = "INSERT INTO [;Database='" & path_connessione & "';PWD=ti&siti&si] SELECT Anagrafiche.* FROM Anagrafiche"

Il problema è che prima del path_connessione mi inserisce il persorso della cartella documenti, quindi dato come errore percorso nn valido, ma io il database c'è l'ho in un percorso di rete.

Spero di essere stato chiara

Grazie in anticipo

alx_81 Profilo | Guru

>Ciao a tutti, devo inserire il contenuto di un database in un
>altro database. il problema che il database ha la password e
>nn riesco a creare la sintassi.
Ma devi farlo per ripeterlo o è un'operazione una tantum?

>Grazie in anticipo
di nulla!

Alessandro Alpi | SQL Server MVP
MCP|MCITP|MCTS|MCT

http://blogs.dotnethell.it/suxstellino
http://suxstellino.wordpress.com
http://mvp.microsoft.com/profiles/Alessandro.Alpi

giucorn Profilo | Junior Member

??? Non capisco

Devo inserire i record da un database all'altro ma il database di destinazione ha una password. Questo e una funzione che va ripetuto alla pressione di una button.

alx_81 Profilo | Guru

>??? Non capisco
mi hai risposto.. è un'operazione non da fare una volta sola, ma ripetuta.
Alla pressione del pulsante puoi lanciare un VBA?

Alessandro Alpi | SQL Server MVP
MCP|MCITP|MCTS|MCT

http://blogs.dotnethell.it/suxstellino
http://suxstellino.wordpress.com
http://mvp.microsoft.com/profiles/Alessandro.Alpi

giucorn Profilo | Junior Member

Io alla pressione del button si creo una vba, creando la connect al database sorgente e da qui vorrei fare l'insert nel database destinatario con password. inserisco tutto il codice della button per far capire meglio:

Dim Campagna_Cati As String = DirectCast(Session("Campagna_WEB"), String)

Dim path_connessione As String = Server.MapPath("~") & "\App_Data\" & Campagna_Cati & ".mdb"
'Path del database origine
Dim path_connessione_Ins As String = Server.MapPath("~") & "\App_Data\Anagrafiche_Da_Inserire.mdb"
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & path_connessione & "';Persist Security Info=True;Jet OLEDB:Database Password=123456"
Dim connectionString_Ins As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & path_connessione_Ins & "';Persist Security Info=True;Jet OLEDB:Database Password=123456"

Dim conn As New OleDb.OleDbConnection(connectionString_Ins)

Dim query_Ins As String
query_Ins = "INSERT INTO [;Database='" & path_connessione & "';PWD=ti&siti&si] SELECT Anagrafiche.* FROM Anagrafiche"
Dim cmd_Ins As New OleDb.OleDbCommand(query_Ins, conn)

Try

Response.Write("<script type='text/javascript'>")
Response.Write("confirm('SICURO DI VOLER INSERIRE NUOVE ANAGRAFICHE');")
Response.Write("</script>")

conn.Open()

cmd_Ins.ExecuteNonQuery()

Catch
' Errore
'MsgBox(Err.Description, MsgBoxStyle.Critical, "ERRORE")
Response.Write("<br>")
Response.Write("<br>")
Response.Write("<br>")
Response.Write("<br>")
Response.Write("<br>")
Response.Write("<br>")
Response.Write("ATTENZIONE ERRORE: CATI_WEB Gestione Tabelle INSERIMENTE NUOVE ANAGRAFICHE -- " & Err.Description)
Finally
' Se la connessione è rimasta aperta, la chiudo
If Not conn Is Nothing Then
conn.Close()
End If

cmd_Ins = Nothing
conn = Nothing
End Try

C'è qualcuno che mi può aiutare....

alx_81 Profilo | Guru

>C'è qualcuno che mi può aiutare....
non ho mai fatto simili operazioni in access (di solito utilizzo processi esterni oppure ETL come con SSIS), però non credo che la insert sia corretta perchè stai dicendo "inserisci nel database" mentre manca il nome della tabella alla quale vuoi accedere per l'inserimento. Se vuoi qualificare la tabella dovrai indicarla dopo aver specificato il database nella forma [db].[nometabella]. Ma ti ripeto, non ho mai provato a fare una cosa del genere. Se riesci fai una prova e facci sapere.

Alessandro Alpi | SQL Server MVP
MCP|MCITP|MCTS|MCT

http://blogs.dotnethell.it/suxstellino
http://suxstellino.wordpress.com
http://mvp.microsoft.com/profiles/Alessandro.Alpi
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 !
Copyright © dotNetHell.it 2002-2025
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5