Ajout de données binaires à une table avec SQL
Les données binaires ne peuvent pas être directement insérées dans une table au moyen de requêtes INSERT INTO ou UPDATE SQL. Pour ajouter des données binaires à une table, vous devez d’abord utiliser le marqueur de paramètre (?) dans la requête comme espace réservé de la valeur binaire. L’exécution de la requête doit inclure un enregistrement qui contient les données binaires dans l’un de ses champs.
Un marqueur est une référence de paramètre à une valeur qui est fournie par un enregistrement envoyé avec la requête. Il est représenté dans l’instruction SQL par un point d’interrogation (?).
L’exemple de code suivant ajoute des données binaires à une table.
#include <windows.h>
#include <Msiquery.h>
#include <tchar.h>
#pragma comment(lib, "msi.lib")
int main()
{
PMSIHANDLE hDatabase = 0;
PMSIHANDLE hView = 0;
PMSIHANDLE hRec = 0;
if (ERROR_SUCCESS == MsiOpenDatabase(_T("c:\\temp\\testdb.msi"), MSIDBOPEN_TRANSACT, &hDatabase))
{
//
// Open view on Binary table so that we can add a new row, must use '?' to represent Binary data
//
if (ERROR_SUCCESS == MsiDatabaseOpenView(hDatabase, _T("INSERT INTO `Binary` (`Name`, `Data`) VALUES ('NewBlob', ?)"), &hView))
{
//
// Create record with binary data in 1st field (must match up with '?' in query)
//
hRec = MsiCreateRecord(1);
if (ERROR_SUCCESS == MsiRecordSetStream(hRec, 1, _T("c:\\temp\\data.bin")))
{
//
// Execute view with record containing binary data value; commit database to save changes
//
if (ERROR_SUCCESS == MsiViewExecute(hView, hRec)
&& ERROR_SUCCESS == MsiViewClose(hView)
&& ERROR_SUCCESS == MsiDatabaseCommit(hDatabase))
{
//
// New binary data successfully committed to the database
//
}
}
}
}
return 0;
}
L’exemple de script suivant ajoute des données binaires à une table.
Dim Installer
Dim Database
Dim View
Dim Record
Set Installer = CreateObject("WindowsInstaller.Installer")
Set Record = Installer.CreateRecord(1)
Record.SetStream 1, "c:\temp\data.bin"
Set Database = Installer.OpenDatabase("c:\temp\testdb.msi", msiOpenDatabaseModeTransact)
Set View = Database.OpenView("INSERT INTO `Binary` (`Name`, `Data`) VALUES ('NewBlob', ?)")
View.Execute Record
Database.Commit ' save changes
Rubriques connexes