(PowerBuilder) Copy a File using a Stream

Nobody would actually copy a file using this method. The purpose of this example is to demonstrate the SourceFile and SinkFile properties, and the RunStream method.

When RunStream is called, the source is read until the end-of-stream condition occurs. All incoming data is copied to the stream's sink. In this example the sink is also a file. A typical application might employ a file as the source or sink, but not both. Usually one side of the stream will be the application itself reading or writing, or perhaps another stream object.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Stream
integer li_Success

loo_Stream = create oleobject
// Use "Chilkat_9_5_0.Stream" for versions of Chilkat < 10.0.0
li_rc = loo_Stream.ConnectToNewObject("Chilkat.Stream")
if li_rc < 0 then
    destroy loo_Stream
    MessageBox("Error","Connecting to COM object failed")
    return
end if

loo_Stream.SourceFile = "qa_data/hamlet.xml"
loo_Stream.SinkFile = "qa_output/hamlet_copy.xml"

li_Success = loo_Stream.RunStream()
if li_Success <> 1 then
    Write-Debug loo_Stream.LastErrorText
    destroy loo_Stream
    return
end if

Write-Debug "File copied."


destroy loo_Stream