Troubleshooting
Problem
This document shows an example of using Data Transfer Automation Objects with Microsoft Visual Basic Script.
Resolving The Problem
See document Data Transfer Automation Objects for details.
Similar information can be found via IBM i Access Client Solutions - Programmer's Toolkit - Database - ActiveX - iSeries Access for Windows ActiveX Automation Objects - data transfer.
The following samples show the minimum code in Microsoft Visual Basic to download a file using the High-Level Data Transfer Automation Objects:
Similar information can be found via IBM i Access Client Solutions - Programmer's Toolkit - Database - ActiveX - iSeries Access for Windows ActiveX Automation Objects - data transfer.
The following samples show the minimum code in Microsoft Visual Basic to download a file using the High-Level Data Transfer Automation Objects:
Dim dt As New cwbx.DatabaseTransfer
dt.Download "MySystem", "QIWS/QCUSTCDT", "C:\MyFile.txt"
For customers who do not have the Microsoft Visual Basic product, the Data Transfer Automation Object can also be used with Microsoft Windows Visual Basic Script.
The code should be saved using extension "vbs". In this environment, the code will differ slightly:
Set dt = CreateObject("cwbx.DatabaseTransfer")
dt.Download "MySystem", "QIWS/QCUSTCDT", "C:\MyFile.txt"
[{"Type":"MASTER","Line of Business":{"code":"LOB68","label":"Power HW"},"Business Unit":{"code":"BU070","label":"IBM Infrastructure"},"Product":{"code":"SWG60","label":"IBM i"},"Platform":[{"code":"PF012","label":"IBM i"}],"Version":"6.1.0"}]
Historical Number
30342112
Was this topic helpful?
Document Information
Modified date:
03 July 2025
UID
nas8N1019297