bugs, 00000010-0000-0010-8000-00aa006d2ea4 - solution

1. .addnew returns {00000000-0000-0000-0000-000000000000}

2. Retrieving the COM class factory for component with CLSID {0006F03A-0000-0000-C000-000000000046} failed due to the following error: 80080005

One of my users gets that error when my code tries to create an
instance of a Redemption SafeMailItem. The user is on Vista as an
admin using Office 2007. The guid is that of the Outlook.Application
COM object.

Is there some relationship between the SafeMailItem and the
Outlook.Application object?

Otherwise, I figure this is some kind of threading issue.

Thanks,
Jeff

3. Inbound Telex: Tue, 9 Sep 03 21:33:47 +0000 - VB.Net

4. Inbound Telex: Tue, 9 Sep 03 22:14:15 +0000

<See Message> schrieb im Newsbeitrag news: XXXX@XXXXX.COM ...
> TEST MESSAGE, PLEASE IGNORE
> ANDY SALMON
>

*knock* *knock*   Heeeelooooo....?  Do you know the group
microsoft.public.test.here?

5. is there an equivalent Function to FORMAT(56,"0000")

6. Can't write more than 8000 characters to an ntext field using a st

Check out the topic: Data Types (Level 2) ... looks like the maximum number 
of bytes for ntext is 8000, same as char and varchar.

Also, the topic: Maximum Capacity Specifications seems to suggest the 
maximum bytes per row you can have is 8,060.

"Elie Grouchko" wrote:

> Hi All
> 
> I'm using ADO from ASP VBScript to write to an ntext column in an SQL Server
> table.
> 
> The string size is 20555 and I use AppendChunk to add chunks of 1000
> characters (20 chunks + 555 leftover).
> 
> The data written to the column gets truncated to 8000 characters. I read in
> the SQL Server documentation that 8000 is the size limit of a parameter when
> calling a stored procedure, but I believe it doesn't apply to the ntext
> data-type.
> 
> I don't have a clue...
> 
> Help will be greatly appreciated
> 
> Many thanks
> 
> Elie Grouchko
> 
> 
> 
> 
> I'm using the following stored procedure:
> 
>   CREATE PROCEDURE Proc_UpdateText
>   @twc_text_description varchar(50),
>   @twc_text_text ntext,
>   @twc_text_proofread bit,
>   @twc_text_type int,
>   @twc_text_id int
>   AS
>   UPDATE [twt_text] SET
>   [twc_text_description]=@twc_text_description,
>   [twc_text_text]=@twc_text_text,
>   [twc_text_proofread]=@twc_text_proofread,
>   [twc_text_type]=@twc_text_type
>   WHERE [twc_text_id] = @twc_text_id
> 
> The following is the function that calls the stored procedure:
> 
> Public Function Proc_UpdateText( _
>      v_Description, _
>      v_Text, _
>      v_ProofRead, _
>      v_TextType, _
>      v_ID)
> 
>      Dim AdoCommand
>      Dim AdoParameter
>      Dim AdoConnection
> 
>      Proc_UpdateText = False
> 
>      On Error Resume Next
> 
>      Set AdoConnection = Server.CreateObject("ADODB.Connection")
>      AdoConnection.Mode = adModeReadWrite
> 
>      AdoConnection.Open "ODBCDSN", "UserId", "Password"
> 
>      Set AdoCommand = Server.CreateObject("ADODB.Command")
>      Set AdoCommand.ActiveConnection = AdoConnection
> 
>      If AdoCommand Is Nothing Then Exit Function
> 
>      AdoCommand.CommandText = "Proc_UpdateText"
>      AdoCommand.CommandType = adCmdStoredProc
> 
>      AdoCommand.Parameters.Append
> AdoCommand.CreateParameter("@twc_text_description", adVarChar, adParamInput,
> 50, v_Description)
>      Set AdoParameter = AdoCommand.CreateParameter("@twc_text_text",
> adLongVarWChar, adParamInput, Len(v_Text)+1)
>      AdoCommand.Parameters.Append AdoParameter
>      WriteLongVarChar AdoParameter, v_Text
> 
>      AdoCommand.Parameters.Append
> AdoCommand.CreateParameter("@twc_text_proofread", adBoolean, adParamInput, ,
> v_ProofRead)
>      AdoCommand.Parameters.Append
> AdoCommand.CreateParameter("@twc_text_type", adInteger, adParamInput, ,
> v_TextType)
>      AdoCommand.Parameters.Append AdoCommand.CreateParameter("@twc_text_id",
> adInteger, adParamInput, , v_ID)
> 
>      AdoCommand.Execute
> 
>      Proc_UpdateText = True
> 
>      Set AdoCommand.ActiveConnection = Nothing
>      Set AdoCommand = Nothing
> End Function
> 
> The following is the function that calls AppendChunk():
> 
> Public Function WriteLongVarChar(ByVal DataField, StringData)
>     Dim NumBlocks
>     Dim ColumnSize
>     Dim LeftOver
>     Dim StrData
>     Dim i
>     Dim MidStart
> 
>     Const cBlockSize = 1000
> 
>     MidStart    = 1
> 
>     If DataField Is Nothing Then Exit Function
> 
>     ColumnSize = Len(StringData)
> 
>     NumBlocks = ColumnSize \ cBlockSize
>     LeftOver = ColumnSize Mod cBlockSize
> 
>     StrData = Mid(StringData, MidStart, LeftOver)
>     DataField.AppendChunk StrData
>     MidStart = MidStart + LeftOver
> 
>     For i = 1 To NumBlocks
>         StrData = Mid(StringData, MidStart, cBlockSize)
>         DataField.AppendChunk StrData
>         MidStart = MidStart + cBlockSize
>     Next
> 
>     WriteLongVarChar = True
> End Function
> 
> 
> 

7. Can't write more than 8000 characters to an ntext field using a stored procedure

8. Runtime error 2147467259 {8000-4005}

When I selected to print an envelope from Customer Invoice / print envelope 
option in quickboks 2007, my office word 2003 opened but then the dialog box 
popped up saying:  Microsoft Visual Basic
            Runtime error 2147467259 {8000-4005}:
            Method 'ReturnAddress ' of object 'Envelope' failed.
I only then have the option to end, and the word program closes.

I have another computer that does not have this problem.  Does anyone know 
how I can fix this???