Esempio invocazione package SQL Server da Visual Basic Script engine:
|
1 2 3 4 5 6 7 8 9 10 11 |
sub ExecutePackage(Server,UserId,UserPw,PackageName); set objDTSPackage = CreateObject("DTS.Package"); objDTSPackage.LoadFromSQLServer Server, UserId,UserPw, DTSSQLStgFlag_Default, "", "", "", PackageName objDTSPackage.Execute Set objDTSPackage = Nothing msgbox("Esecuzione package conclusa") End Sub |
|
1 |
call ExecutePackage("localhost","sa", "sa", "PortingFromIB") |
Per le connessioni ADO in Delphi si usa in genere il componente TADOConnection i cui parametri di connessioni sono definiti da una stringa di connessione. Questo componente è la mappatura esatta delle API degli MDAC per le connessioni ADO. La definizione della connection string non è sempre immediata e quando si crea un programma di configurazione /…
Leggi tutto
In Delphi è possibile accedere a tutte le API (Advanced Program Interfaces) di Windows, molte di queste già importate in molte librerie preconfezionate per semplificarci la vita. La funzione di Windows che permettere di legere l’host name è GetComputerName implementata nella dll di windows “Kernel32.dll”. La “Kernel32.dll” viene mappata in Delphi dalla unit Windows.pas. Codice…
Leggi tutto
In alcuni casi particolari è utile generare dinamicamente delle query all’interno di stored procedure xchè esistono istruzioni non parametrabilizzabili in Sql-Server. Ad esempio la “drop table” non permette la sintassi : “drop table @mia_variabile”. Per ovviare a questo problema è possibile eseguire una query costruita dinamicamente tramite il comando exec. Nell’esempio si costruirà una stored…
Leggi tutto
L’utilizzo dei campi autoincrementali che vengono chiamati in Ms-SqlSrv “identity” ed ad esempio in interbase “generator” (generatori), è una pratica molto importante, soprattutto quando una tabella in un permette l’accesso contemporaneo in lettura scrittura a più utenti. Questi generatori nei db transazionali garantiscono l’univocità xchè generati dal server in modo da non permettere collisioni in…
Leggi tutto
Tramite VB Scripts è anche possibile (in maniera un pochino limitata) invocare Web Services. Nell’esempio ci connetteremo a un servizio di traduzione offerto da Altavista(http://www.altavista.com). Questo servizio web permette, senza scrivere una riga di codice, di avere a disposizione un potente strumento di traduzione da inserire nelle vs. applicazioni. Il servizio lo abbiamo trovato consultando…
Leggi tutto
