Hi all, I’m really sorry to trouble you with such a trivial request. I’ve been doing programming on and off for 5 years or so, but not much exposure to VB.

I’m trying to implement a VB ActiveX routine in DTS SQL Server 2000. What I’d like to do, which I’m having problems with, is create a function that takes two string arguments, does some processing, and returns a string.

I’ve created an example in VB .Net which works, but I can’t get it to work on SQL Server 2000 DTS. I guess it is something to do with a change between the two versions of the languages. However, I haven’t been able to find one example of a function (plenty of subs but no functions).

Anyway, the failing code is below:

'************************************************* *********************
' Visual Basic ActiveX Script
'************************************************* ***********************

Function Main()
Dim Resp as String
  Set Resp = Hello (“Param1”,”Param2”)
    Main = DTSTaskExecResult_Success
End Function

Function Hello (ByVal MyVar1 as String, ByVal MyVar2 as String ) as String
 Hello= "Hello"
End Function

I get an error on line 10 (the line starting Function Hello (ByVal…

Has anyone got any ideas what I’m doing wrong (apart from program in a language I clearly know nothing about!)?

I genuinely appreciate any feedback.

Many thanks.



Well if a reboot doesn't fix it, I don't know what will!

Hello? Anyone? Here is your chance to make yourself feel better by proving how rubbish I am!

Well if a reboot doesn't fix it, I don't know what will!

But, you haven't posted the ERROR that you got on Line 10. How about posting that?

_________________________
- Vijay G
Strive for Perfection