re http://support.microsoft.com/kb/q175261/

[timdodgson]

Hi every body

first off i am completley new to vb i am trying to make the following activex.dll

http://support.microsoft.com/kb/q175261/

when i attempt to compile i get the folowing error message
Compile error

expected: line no or label or statement or end of statemnet

Please help

I am using visual basic 6 enterprise edtion

Many Thanks in advance
Tim

 

[chiph]

Can you post the lines near where the error is ocurring?

Chip H.


____________________________________________________________________
If you want to get the best response to a question, please read FAQ222-2244 first

 

[timdodgson]

Many Thanks foryour replie here is the line

(lpvDest As Any, lpvSource As Any, ByVal cbCopy As Long)

Tim

 

[strongm]

[b][red]' Enter the following Declare statement as one single line:[/red][/b]
      Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory"
       (lpvDest As Any, lpvSource As Any, ByVal cbCopy As Long)

Note that there is at least one other line in the example where a single line of code has unfortunately been split over two

Mind you both offending lines should have been highlighted in the IDE before you got anywhere near to compiling the program ...

 

[timdodgson]

Will give it a go Thank You so much

Will post back with the result

Tim Dodgson

 

[timdodgson]

Thanks again that seems to od curedthat bit now i am simular probs with thischunk of code

'Move the bitmap into its own array
ReDim ArrBmp(UBound(Arr) - BitmapOffset)
CopyMemory ArrBmp(0), Arr(BitmapOffset), UBound(Arr) -
BitmapOffset + 1

Any more help would be greatly apprecited
Many Thanks again in advance
Tim

 

[strongm]

As I said "Note that there is at least one other line in the example where a single line of code has unfortunately been split over two"

I'll now leave this as an exercise for the reader ...

 

[timdodgson]

I worked it out

as follows

CopyMemory ArrBmp(0), Arr(BitmapOffset), UBound(Arr) - BitmapOffset + 1

It was move BitmapOffset + 1 up but wot through me was the + weas not pasting in

Got there in the end

Many Thanks Again

Tim