mirror of
https://github.com/php/php-src.git
synced 2026-03-24 00:02:20 +01:00
56804e3221
We add support for creating `VT_ERROR` variants via `__construct()`, and allow casting to int via `variant_cast()` and `variant_set_type()`. We do not, however, allow type conversion by other means, to avoid otherwise easily introduced type confusion. VB(A) also only allows explicit type conversion. We also introduce `DISP_E_PARAMNOTFOUND` which might be the most important `scode` for this purpose, since this allows to skip optional parameters in method calls. Closes GH-8886.
48 lines
1.1 KiB
PHP
48 lines
1.1 KiB
PHP
--TEST--
|
|
Bug GH-8750 (Can not create VT_ERROR variant type)
|
|
--EXTENSIONS--
|
|
com_dotnet
|
|
--SKIPIF--
|
|
<?php
|
|
$provider = "Microsoft.ACE.OLEDB.12.0";
|
|
$filename = __DIR__ . "\\gh8750.mdb";
|
|
$catalog = new com("ADOX.Catalog");
|
|
try {
|
|
$catalog->Create("Provider=$provider;Data Source=$filename");
|
|
} catch (com_exception) {
|
|
die("skip $provider provider not available");
|
|
}
|
|
$catalog = null;
|
|
@unlink($filename);
|
|
?>
|
|
--FILE--
|
|
<?php
|
|
$filename = __DIR__ . "\\gh8750.mdb";
|
|
|
|
$catalog = new com("ADOX.Catalog");
|
|
$catalog->Create("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=$filename");
|
|
$catalog = null;
|
|
|
|
$db = new com("ADODB.Connection");
|
|
$db->ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=$filename";
|
|
$db->Mode = 1; // adModeRead
|
|
$db->Open();
|
|
// adSchemaProviderSpecific, *missing*, JET_SCHEMA_USERROSTER
|
|
$rs = $db->OpenSchema(-1, new variant(DISP_E_PARAMNOTFOUND, VT_ERROR), "{947bb102-5d43-11d1-bdbf-00c04fb92675}");
|
|
// manual counting since rs.RecordCount is -1 (not supported)
|
|
$i = 0;
|
|
while (!$rs->EOF) {
|
|
$rs->MoveNext();
|
|
$i++;
|
|
}
|
|
$rs->Close();
|
|
$db->Close();
|
|
var_dump($i);
|
|
?>
|
|
--EXPECT--
|
|
int(1)
|
|
--CLEAN--
|
|
<?php
|
|
unlink(__DIR__ . "/gh8750.mdb");
|
|
?>
|