Open For Binary Access Write - непонятные 4 байта - VB

Формулировка задачи:

Добрый день. Может кто-то сможет помочь. Задача вот какая: принимаю с web сервера некие данные, которые нужно записать в файл. Все принимается как надо, но при записи в файл откудато берутся в самом начале лишние 4 БАЙТА. Что делать? Уже голову сломал! Вот и код:

filecontents = get_data_from_oms(POST_DATA, 'http://xxxxxxxx.ru/get_file.php')
'get_data_from_oms - моя функция для отправки POST на сервер и приема ответа
 
filecontents = StrConv(filecontents, vbUnicode)
filecontents = Replace(sstr, Chr(0), '', , , vbTextCompare)
'вот в этом месте filecontents содержит то что нужно
 
Open 'c:TESTFILE' For Binary Access Write As #1
Put #1, , filecontents
Close #1
'а вот здесь в файл TESTFILE записывается 4 байта ( е) и filecontents
'

Если кто-то сможет помочь разобраться, тому большое спасибо.

Решение задачи: «Open For Binary Access Write - непонятные 4 байта»

textual
                            Листинг программы 
                        

                            if ( $_POST['file_to_send'] )
{
  $filename = 'X:\home\xxxxxxx.ru\www\docs\chemical_xls\ ' . $filename_str;
  $fd = fopen( 'X:\home\xxxxxxx.ru\www\docs\chemical_xls\ ' . $filename_str, 'rb' );
  $content = fread( $fd, filesize( $filename ) );
  fclose( $fd );
  echo $contents;
}
                        