PDA

Visualizza la versione completa : importazione database


ostuni
12-11-2017, 14:42
dovrei importare sul sito web aziendale almeno una volta a settimana un file excel di circa 1200/1300 righe
Secondo voi qual' il sistema migliore per importare i dati?


:dh:

marino51
13-11-2017, 10:14
ho utilizzato tempo fa vbs per l'importazione,
si possono usare altre soluzioni (anche una macro excel simil vbs)

qualche indicazione,

crea un file vuoto (usando blocco note) con il nome che preferisci (magari il nome del database)
rinominalo con estensione ".udl"
clicca il file 2 volte x eseguirlo
ti si apre la finestra delle impostazioni, inserisci i parametri per raggiungere il tuo db
fai la verifica di connessione, se positiva, il file ok

il codice che segue premette l'accesso al db usando il file "udl" appena creato
ed apre il file excel

per il resto del codice, ... divertiti

Set TargetDb=CreateObject("ADODB.Connection")
TargetDB.ConnectionString="File Name=" & UdlDir & "Database.UDL;"
TargetDb.Open


Set oXL=WScript.CreateObject("EXCEL.application")
oXL.Visible=False
oXL.workbooks.open BudgetDir & "BudgetTecnici_" & SeID & ".xls"
oXL.sheets("Strn003").Activate
If oXL.Cells(1, 1).Value="" Then
LogFile.Write Date & "-" & Time & "Il Foglio Strn003 vuoto, interrompo il lavoro" & vbCrLf & vbCrLf
oXL.application.quit
LogFile.Close
TargetDB.Close
Set TargetDB=Nothing
WScript.Quit(1)
End If

ps ho aggiornato db oracle, mssql e access con questo sistema

ostuni
13-11-2017, 11:53
ho utilizzato tempo fa vbs per l'importazione,
si possono usare altre soluzioni (anche una macro excel simil vbs)

qualche indicazione,

crea un file vuoto (usando blocco note) con il nome che preferisci (magari il nome del database)
rinominalo con estensione ".udl"
clicca il file 2 volte x eseguirlo
ti si apre la finestra delle impostazioni, inserisci i parametri per raggiungere il tuo db
fai la verifica di connessione, se positiva, il file ok

il codice che segue premette l'accesso al db usando il file "udl" appena creato
ed apre il file excel

per il resto del codice, ... divertiti

Set TargetDb=CreateObject("ADODB.Connection")
TargetDB.ConnectionString="File Name=" & UdlDir & "Database.UDL;"
TargetDb.Open


Set oXL=WScript.CreateObject("EXCEL.application")
oXL.Visible=False
oXL.workbooks.open BudgetDir & "BudgetTecnici_" & SeID & ".xls"
oXL.sheets("Strn003").Activate
If oXL.Cells(1, 1).Value="" Then
LogFile.Write Date & "-" & Time & "Il Foglio Strn003 vuoto, interrompo il lavoro" & vbCrLf & vbCrLf
oXL.application.quit
LogFile.Close
TargetDB.Close
Set TargetDB=Nothing
WScript.Quit(1)
End If

ps ho aggiornato db oracle, mssql e access con questo sistema



Grazie per la risposta
non capisco per la procedura, dove dovrei mettere il file.udl ed il codice postato?
L'importazione deve avvenire su database del sito web.
Posso usare il file .udl anche in una pagina web?

optime
13-11-2017, 12:29
una cosa che vuoi fare in automatico o manualmente?

ostuni
13-11-2017, 12:39
una cosa che vuoi fare in automatico o manualmente?

per una serie di varie ragioni da fare in automatico

optime
13-11-2017, 13:51
come arriva quel file sul server WEB? (se ci arriva)

ostuni
13-11-2017, 17:06
come arriva quel file sul server WEB? (se ci arriva)

infatti questo il primo problema da risolvere

optime
13-11-2017, 17:26
chi genera quel file?

ostuni
13-11-2017, 19:15
chi genera quel file?

il file generato da un gestionale desktop

optime
13-11-2017, 23:51
la generazione automatica o qualcuno lancia manualmente la generazione?

Loading