BUG: sp_OASetProperty Truncates Varchar Types to 255 Characters (278448)

MORE INFORMATION

Steps to Reproduce Behavior

1. Create a new project on the C: drive and name the project "SQLproj.vbp".
2. To add a class module with the name "SQLrepro" copy and paste the code that follows. Then, save this class to file with the name "SQLrepro.cls".

   Option Explicit
   Public PropMessage As String
   
   Public Property Let TestMessage(strTest As String)
   PropMessage = strTest
   Debug.Print PropMessage
   End Property
   Public Property Get TestMessage() As String
   TestMessage = PropMessage
   End Property
   					

3. To build the Visual Basic COM DLL file SQLproj.dll, from the File menu, click Make SQLproj.dll.
4. Use Regsvr32.exe to register the SQLproj.dll file by typing the following at the command prompt:

   regsvr32.exe C:\SQLproj.dll

5. Copy and then run the following Transact-SQL script in the Microsoft SQL Server 7.0 Query Analyzer:

   -- Create stored procedure first
   CREATE PROCEDURE sp_Test_Dll AS
   DECLARE @object int 
   DECLARE @hr int 
   DECLARE @property varchar(3000) 
   DECLARE @return varchar(1000) 
   
   -- Create an object. 
   EXEC @hr = sp_OACreate 'SQLproj.SQLrepro', @object OUT 
   
   -- Call a method. 
   EXEC @hr = sp_OASetProperty @object, "TestMessage",
   '**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********0000000000**********123456789'
   EXEC @hr = sp_OAGetProperty @object, "TestMessage", @property OUT
   -- It should only print first 255 characters. "6789" is truncated in this example 
   Print @property
   
   -- Destroy the object. 
   EXEC @hr = sp_OADestroy @object 
   Go
   -- execute stored procedure here
   sp_Test_Dll
   -- The truncated result has only 255 characters displayed. Number 6789 was truncated