Database Journal
MS SQL Oracle DB2 Access MySQL PostgreSQL Sybase PHP SQL Etc SQL Scripts & Samples Links Database Forum

» Database Journal Home
» Database Articles
» Database Tutorials
MS SQL
Oracle
DB2
MS Access
MySQL
» RESOURCES
Database Tools
SQL Scripts & Samples
Links
» Database Forum
» Sitemap
Free Newsletters:
DatabaseDaily  
News Via RSS Feed


follow us on Twitter
Database Journal |DBA Support |SQLCourse |SQLCourse2
 

Featured Database Articles

MS SQL

Posted Feb 27, 2000

Data Transformation Services (DTS) - Page 3

By DatabaseJournal.com Staff

  • For the purpose of this example we require four main objects on our form.


ObjectNameUsage Description
Text BoxtxtDescriptionView and Set CustomTask Description Property
Text BoxtxtMyPropertyView and Set custom CustomTask MyProperty Property (See Page 1)
Command ButtoncmdOKClose Form, saving Properties
Command ButtoncmdCancelClose Form, without saving Properties

Sample CustomTask User Interface 'frmCustom'

  • The code behind the form is fairly simple. In the Form_Load event you read the properties and display them on the form. The cmdOK_Click event is used to save the properties back to the CustomTask.

Option Explicit

Private Sub Form_Load()
 'Get Reference to our CustomTask
Dim oCustomTask As MyCustomTaskUI.CustomTask
    Set oCustomTask = oTask.CustomTask
    
 'Set the form object values from our Task/CustomTask properties
txtDescription.Text = oTask.Description
    txtMyProperty.Text = oCustomTask.MyProperty
    
    Set oCustomTask = Nothing
End Sub

Private Sub cmdOK_Click()
 ' Validate Properties
If txtMyProperty.Text = "" Then
        MsgBox "Please enter a value for MyProperty", vbCritical, App.Title
        Exit Sub
    End If
    
 'Get Reference to our CustomTask
Dim oCustomTask As MyCustomTaskUI.CustomTask
    Set oCustomTask = oTask.CustomTask
    
 'Save the form settings back to the Task/CustomTask
oTask.Description = txtDescription.Text
    oCustomTask.MyProperty = txtMyProperty.Text
    Set oCustomTask = Nothing
    Unload Me
End Sub

Private Sub cmdCancel_Click()
    Unload Me
End Sub

  • Now you can compile the DLL and Register it through Enterprise Manager.
    • Open an existing or new package
    • From the Task menu, select Register Custom Task...
    • Complete the Register Custom Task dialog and click OK
    • Your new CustomTask will now be available from the Tasks toolbar and menu

Whilst this CustomTask does nothing more than display a few message boxes, these in themselves are useful in determining when the different events are raised. The code for this CustomTask is available for download below, as a Visual Basic 5 project.


Please note that this program is provided without any warranty or assurances of any kind. Use it at your own risk. Commercial distribution or distribution for profit in any form is strictly forbidden without prior permission from the author.

Download MyCustomTaskUI (~11K).



MS SQL Archives

Comment and Contribute

 


(Maximum characters: 1200). You have characters left.

 

 




Latest Forum Threads
MS SQL Forum
Topic By Replies Updated
SQL 2005: SSIS: Error using SQL Server credentials poverty 3 August 17th, 07:43 AM
Need help changing table contents nkawtg 1 August 17th, 03:02 AM
SQL Server Memory confifuration bhosalenarayan 2 August 14th, 05:33 AM
SQL Server Primary Key and a Unique Key katty.jonh 2 July 25th, 10:36 AM


















Thanks for your registration, follow us on our social networks to keep up-to-date