WriteDate Method

Applies to TestComplete 15.42, last modified on September 08, 2022

Description

The WriteDate method writes a date/time value to a binary file.

Declaration

aqBinaryFileObj.WriteDate()

aqBinaryFileObj An expression, variable or parameter that specifies a reference to an aqBinaryFile object
Result Date/Time

Applies To

The method is applied to the following object:

Result Value

The date value to write to a file.

Remarks

  • On success, the cursor position is shifted by the length of the written data.

  • To use this method, you should open the needed file with the faWrite or faReadWrite access permission. See the description of the OpenBinaryFile method.

Example

The code below opens a file for reading, posts its data to the test log in different formats (binary, boolean, and so on) and then closes the file.

JavaScript, JScript

function ReadingDataFromBinaryFile()
{
 Path = "C:\\MyFiles\\FileName.txt";
 
 // Creates a new file and opens it for writing in binary mode
 myFile = aqFile.OpenBinaryFile(Path, aqFile.faWrite, true);
 
 // Writes data to the file
 myFile.WriteBool(false);
 myFile.WriteCurrency(3000000000);
 myFile.WriteDate(aqDateTime.Today());
 myFile.WriteFloat(1543.514)
 myFile.WriteInt(58942);
 myFile.WriteString("Hello!");
 
 // Closes the file
 myFile.Close();
 
 // Opens the file for reading
 myFile = aqFile.OpenBinaryFile(Path, aqFile.faRead);
 
 // Reads data from the file in different formats
 Log.Message("The bolean is: "+ myFile.ReadBool());
 Log.Message("The currency is: "+ myFile.ReadCurrency());
 Log.Message("The date is: " + myFile.ReadDate());
 Log.Message("The float number is: " + myFile.ReadFloat());
 Log.Message("The integer number is: "+ myFile.ReadInt());
 Log.Message("The string is: "+ myFile.ReadString(6));
 
 // Closes the file
 myFile.Close();
}

/*
  The routine produces the following output:
  The bolean is: false
  The currency is: 3000000000
  The date is: Wed Jun 23 00:00:00 UTC+0400 2010
  The float number is: 1543.514
  The integer number is: 58942
  The string is: Hello!
*/

Python

def ReadingDataFromBinaryFile():
  Path = "C:\\MyFiles\\FileName.txt"
  # Creates a new file and opens it for writing in binary mode
  myFile = aqFile.OpenBinaryFile(Path, aqFile.faWrite, True)
  # Writes data to the file
  myFile.Write(False)
  myFile.Write(3000000000) 
  myFile.Write(aqDateTime.Today())
  myFile.Write(1543.514)
  myFile.Write(58942)
  myFile.Write("Hello!")
  # Closes the file
  myFile.Close()
  # Opens the file for reading
  myFile = aqFile.OpenBinaryFile(Path, aqFile.faRead)
  # Reads data from the file in different formats 
  Log.Message("The bolean is: "+ str(myFile.ReadBool()))
  Log.Message("The currency is: "+ str(myFile.ReadCurrency()))
  Log.Message("The date is: " + str(myFile.ReadDate()))
  Log.Message("The float number is: " + str(myFile.ReadFloat()))
  Log.Message("The integer number is: "+ str(myFile.ReadInt()))
  Log.Message("The string is: "+ myFile.ReadString(6))
  # Closes the file
  myFile.Close();

# The routine produces the following output:
# The bolean is: False
# The currency is: 3000000000
# The date is: Wed Jun 23 00:00:00 UTC+0400 2010
# The float number is: 1543.514
# The integer number is: 58942
# The string is: Hello!

VBScript

Sub ReadingDataFromBinaryFile()
Dim Path, myFile
 'Set Path = "C:\MyFiles\FileName.txt"
 
 ' Creates a new file and opens it for writing in binary mode
 Set myFile = aqFile.OpenBinaryFile("C:\MyFiles\FileName.txt", aqFile.faWrite, true)
 
 ' Writes data to the file
 Call myFile.WriteBool(false)
 Call myFile.WriteCurrency(3000000000)
 Call myFile.WriteDate(aqDateTime.Today())
 Call myFile.WriteFloat(1543.514)
 Call myFile.WriteInt(58942)
 Call myFile.WriteString("Hello!")
 
 ' Closes the file
 Call myFile.Close()
 
 ' Opens the file for reading
 Set myFile = aqFile.OpenBinaryFile("C:\MyFiles\FileName.txt", aqFile.faRead)
 
 ' Reads data from the file in different formats
 Call Log.Message("The bolean is: "+ aqConvert.VarToStr(myFile.ReadBool()))
 Call Log.Message("The currency is: "+ aqConvert.CurrencyToStr(myFile.ReadCurrency()))
 Call Log.Message("The date is: " + aqConvert.DateTimeToStr(myFile.ReadDate()))
 Call Log.Message("The float number is: " + aqConvert.FloatToStr(myFile.ReadFloat()))
 Call Log.Message("The integer number is: "+ aqConvert.IntToStr(myFile.ReadInt()))
 Call Log.Message("The string is: "+ myFile.ReadString(6))
 
 ' Closes the file
 Call myFile.Close()
End Sub

' The routine produces the following output:
' The bolean is: false
' The currency is: 3000000000
' The date is: Wed Jun 23 00:00:00 UTC+0400 2010
' The float number is: 1543.514
' The integer number is: 58942
' The string is: Hello!

DelphiScript

procedure ReadingDataFromBinaryFile;
var Path, myFile: OleObject;
begin
 Path := 'C:\MyFiles\FileName.txt';
 
 // Creates a new file and opens it for writing in binary mode
 myFile := aqFile.OpenBinaryFile(Path, aqFile.faWrite, true);
 
 // Writes data to the file
 myFile.WriteBool(false);
 myFile.WriteCurrency(3000000000);
 myFile.WriteDate(aqDateTime.Today());
 myFile.WriteFloat(1543.514);
 myFile.WriteInt(58942);
 myFile.WriteString('Hello!');
 
 // Closes the file
 myFile.Close();
 
 // Opens the file for reading
 myFile := aqFile.OpenBinaryFile(Path, aqFile.faRead);
 
 // Reads data from the file in different formats
 Log.Message('The bolean is: '+ myFile.ReadBool());
 Log.Message('The currency is: '+ myFile.ReadCurrency());
 Log.Message('The date is: ' + myFile.ReadDate());
 Log.Message('The float number is: ' + myFile.ReadFloat());
 Log.Message('The integer number is: '+ myFile.ReadInt());
 Log.Message('The string is: '+ myFile.ReadString(6));
 
 // Closes the file
 myFile.Close();
end;

{
  The routine produces the following output:
  The bolean is: false
  The currency is: 3000000000
  The date is: Wed Jun 23 00:00:00 UTC+0400 2010
  The float number is: 1543.514
  The integer number is: 58942
  The string is: Hello!
}

C++Script, C#Script

function ReadingDataFromBinaryFile()
{
 Path = "C:\\MyFiles\\FileName.txt";
 
 // Creates a new file and opens it for writing in binary mode
 myFile = aqFile["OpenBinaryFile"](Path, aqFile.faWrite, true);
 
 // Writes data to the file
 myFile["WriteBool"](false);
 myFile["WriteCurrency"](3000000000);
 myFile["WriteDate"](aqDateTime.Today());
 myFile["WriteFloat"](1543.514)
 myFile["WriteInt"](58942);
 myFile["WriteString"]('Hello!');
 
 // Closes the file
 myFile["Close"]();
 
 // Opens the file for reading
 myFile = aqFile["OpenBinaryFile"](Path, aqFile.faRead);
 
 // Reads data from the file in different formats
 Log["Message"]( "The bolean is: "+ myFile["ReadBool"]() );
 Log["Message"]( "The currency is: "+ myFile["ReadCurrency"]() );
 Log["Message"]( "The date is: " + myFile["ReadDate"]());
 Log["Message"]( "The float number is: " + myFile["ReadFloat"]() );
 Log["Message"]( "The integer number is: "+ myFile["ReadInt"]() );
 Log["Message"]( "The string is: "+ myFile["ReadString"](6) );
 
 // Closes the file
 myFile["Close"]();
}

/*
  The routine produces the following output:
  The bolean is: false
  The currency is: 3000000000
  The date is: Wed Jun 23 00:00:00 UTC+0400 2010
  The float number is: 1543.514
  The integer number is: 58942
  The string is: Hello!
*/

See Also

Working With Files From Scripts
WriteInt Method
WriteByte Method
WriteBytes Method
WriteShort Method
WriteCurrency Method
WriteInt64 Method
WriteString Method
WriteBool Method
WriteFloat Method
aqDateTime Object

Highlight search results