像VB6一样在PHP中编写一个布尔值

Question

将VB6代码转换为PHP。但我有一个问题： 在VB6中：

    Open myFile For Binary Access Write As numFile
      Put #numFile, , True
      '(...)
    close numFile

这个文件是：ÿÿ

但我尝试在PHP中执行此操作：

    $fp = fopen("test","wb");
    $fwrite = fwrite($fp, TRUE);
    fclose($fp);

我的意思是VB6中的布尔值就像一个整数。 我尝试了所有格式的pack（）但没有发布（http://www.php.net/manual/en/function.pack.php）

    $fwrite  = fwrite($fp, pack('S', TRUE));

一个想法？

Answer 1

如果您希望VB6将文件作为布尔文件读取，则必须将每个布尔true写为"\xFF\xFF"，将每个布尔false写为"\x00\x00" }。我不认为pack()可以帮助你这样做。 E.g：

fwrite($fp, $my_boolean ? "\xFF\xFF" : "\x00\x00");

ÿ是ISO {8859-1 / Windows代码页1252值255