R
rettieads
Hi,
I have been working on producing a custom contact form for our company
in Outlook 2003. This adapts some code that I got from:
http://www.outlookcode.com/d/forms/reqcat.htm#setup#setup
I am trying to adapt the code from the above site to retrieve a string
with the current Master Category list from the registry instead of
hard coding the string as in the example.
I have added a function to return the Master Category list, but when I
then publish and open the form, I am getting an error 'Expected end of
statement Line no 104'
I have included the snippet of code that Line 104 falls within:
Public Function GetMCL() As String
' Function returns a semicolon-delimited string that is the
Master Category List. Use the VBA
' function Split() to break up the list into individual category
items
LINE 104>>>> Dim arrVersion As Variant, _
objShell As Object, _
arrTemp As Variant, _
intCounter As Integer, _
strBuffer As String
I have recreated the code in an Access VBA module and there is no
problem. I also can't work out how to run Outlook code through a
debugger which doesn't help!!!!
Can anyone suggest what is causing this error?
Regards,
Adele Summers
I have been working on producing a custom contact form for our company
in Outlook 2003. This adapts some code that I got from:
http://www.outlookcode.com/d/forms/reqcat.htm#setup#setup
I am trying to adapt the code from the above site to retrieve a string
with the current Master Category list from the registry instead of
hard coding the string as in the example.
I have added a function to return the Master Category list, but when I
then publish and open the form, I am getting an error 'Expected end of
statement Line no 104'
I have included the snippet of code that Line 104 falls within:
Public Function GetMCL() As String
' Function returns a semicolon-delimited string that is the
Master Category List. Use the VBA
' function Split() to break up the list into individual category
items
LINE 104>>>> Dim arrVersion As Variant, _
objShell As Object, _
arrTemp As Variant, _
intCounter As Integer, _
strBuffer As String
I have recreated the code in an Access VBA module and there is no
problem. I also can't work out how to run Outlook code through a
debugger which doesn't help!!!!
Can anyone suggest what is causing this error?
Regards,
Adele Summers