Hello,

I want to be able to pass progress information in an ActiveX script back to
the calling application, e.g. 1000 records processed - like the built in
tasks do.

Is there a way to do this in SQL Server 2000?

Thanks

Gerhard

On Mon, 24 Apr 2006 08:27:56 -0700, Gerhard Wessels wrote:

I forgot to add that I'd like the information to surface in the package's
OnProgress event.

Gerhard. Have you had a look at this

http://support.microsoft.com/default...EN-US;Q221193&

--


Allan Mitchell
www.SQLDTS.com
www.SQLIS.com
www.Konesans.com


"Gerhard Wessels" <gerhard (AT) eastmin (DOT) co.za> wrote

On Mon, 24 Apr 2006 11:46:30 -0400, Allan Mitchell wrote:

Allan,

I want to be able to "push/fire" events so to speak from the DTS package
back to the calling application. In my case the calling application is is
a Delphi one using SQL-DMO.

In one of my ActiveX tasks in my package I open a dataset and
process batches of records in a while loop from the dataset. I want to
be able to notify the calling app through the package's OnProgress event of
the progress in the loop.

My problem is that I have no way of knowing how far the task has
progressed while it is running and when processing hundreds of thousands
of records it appears as if nothing is happening.

The link you've referred me to talks about getting access to the
package's standard events from a VB application.

SQL DMO has nothing to do with DTS. You need to register the DTS Object
library in your application. I have never used Delphi but would not expect
it to be any different in this respect to registering the SQL DMO object
library

Try registering "Microsoft DTSPackage Object Library" (Dtspkg.dll )

Have a look here as well


Redistributing DTS with your program
(http://www.sqldts.com/default.aspx?225)

--


Allan Mitchell
www.SQLDTS.com
www.SQLIS.com
www.Konesans.com


"Gerhard Wessels" <gerhard (AT) eastmin (DOT) co.za> wrote

On Mon, 24 Apr 2006 15:19:32 -0400, Allan Mitchell wrote:

I use SQL-DMO to execute my DTS packages from a Delphi application.
For what I want to do the calling application is irrelevant. It could be
the package designer for that matter - so leave that out of the equation.

All I want to do is to be able to fire the Package object's (obtained
through DTSGlobalVariables.Parent from an ActiveX script task
WHITHIN the package) OnProgress event in order to feed progress
information of the script back to the calling app be it DTSRunUI/SQL
Server package designer/Custom app whatever.

When creating a custom task this is possible through the pPackageEvents
object that is passed to the custom task's execute method. But how do I
get to the pPackageEvents object from a standard ActiveX Script Task?
I could achieve what I want to do by creating a custom task and firing
the OnProgress event when appropriate, but first prize would be to be able
to do this with an ActiveX Script Task.

I hope this explains better what I want.

How are you firing a package through SQLDMO? DMO is the management API for
SQL Server not DTS.

I do not think you can do what you want through the Active X task alone.

--


Allan Mitchell
www.SQLDTS.com
www.SQLIS.com
www.Konesans.com


"Gerhard Wessels" <gerhard (AT) eastmin (DOT) co.za> wrote

On Tue, 25 Apr 2006 07:14:32 -0400, Allan Mitchell wrote:

:~)! ANY part of SQL Server can be managed via SQLDMO including DTS (which
is as far as I am concerned a part of SQL Server).

SQLDMO is the API that Enterprise Manager uses to administer SQL Server
including creation/editing/execution of DTS packages.
The same functionality is therefore available to any programming language
that can import the SQLDMO library which Delphi can do. The entire package
can be created programmatically in Delphi using SQLDMO. In fact, I have
written a DTSRunUI clone in Delphi that fits into the look of my
applications. I get and set global variables, execute packages and
display progress information.

I you want I can show you Delphi code that accomplishes this. If VB can do
it then Delphi sure as hell can also :-)).

Anyway, I'll look into doing a custom task.