IBM Support

Minimal Code for Data Transfer Automation Objects Using Microsoft Windows Visual Basic Script

Troubleshooting


Problem

This document shows an example of using Data Transfer Automation Objects with Microsoft Visual Basic Script.

Resolving The Problem

Rochester Support Center Technote document N1019459, Data Transfer Automation Objects, discusses the Data Transfer Automation Objects. To link to document New immediately, click here.

Similar information can be found via IBM iSeries Access for Windows - Programmer's Toolkit - Programmer's Toolkit - Database - ActiveX - iSeries Access for Windows ActiveX Automation Objects - data transfer.

These documents show the minimal code in Microsoft Visual Basic to download a file using the following 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. A Text Editor (like Notepad) can be used to produce the code. 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":"LOB57","label":"Power"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SWG60","label":"IBM i"},"Platform":[{"code":"PF012","label":"IBM i"}],"Version":"6.1.0"}]

Historical Number

30342112

Document Information

More support for:
IBM i

Software version:
6.1.0

Operating system(s):
IBM i

Document number:
644157

Modified date:
18 December 2019

UID

nas8N1019297

Manage My Notification Subscriptions