-----Original Message----- From: j [mailto:hawk...@froggy.com.au] Posted At: Sunday, February 23, 2003 2:08 PM Posted To: MySQL Conversation: LongText bug (or just my programming) Subject: LongText bug (or just my programming)

Description:

I have created a Mysql data base with a long text field, and when ever i try to call the "rs.update" with ASP it says

"Multiple-step OLE DB operation generated errors. Check each OLE DB status value, if available. No work was done"

it only happens with long, mediumtext fields and i dont know why

How-To-Repeat:

<%@ Language=VBScript %> <% Option Explicit %> <% RESPONSE.BUFFER = TRUE %> <!--#include file="../session.asp"-->

<% CONST ADLOCKREADONLY = 1 CONST ADLOCKPESSIMISTIC = 2 CONST ADOPENSTATIC = 3

IF NOT ISEMPTY(REQUEST.FORM("Submit"))THEN %>

<!--#include file="../../../dbopen.pwp"--> <% Dim updatenumber updatenumber = REQUEST.FORM("sn") Dim DimUpdateHeading, DimUpdatesubtitle, DimUpdatebreif, Dimupdatestory, DimUpdateauthor, DimUpdateMenuLink DimUpdateHeading = REPLACE(REQUEST.FORM("heading"), "'", "&#8217;", 1) DimUpdatesubtitle = REPLACE(REQUEST.FORM("subtitle"), "'", "&#8217;", 1) DimUpdatebreif = REPLACE(REQUEST.FORM("breif"), "'", "&#8217;", 1) Dimupdatestory = REPLACE(REQUEST.FORM("story"), "'", "&#8217;", 1) DimUpdateauthor = REPLACE(REQUEST.FORM("author"), "'", "&#8217;", 1) DimUpdateMenuLink = REPLACE(REQUEST.FORM("menulink"), "'", "&#8217;", 1) DIM DimUpdateSQL DimUpdateSQL = "SELECT Heading,SubTitle,Brief FROM News WHERE Story_ID = " & updatenumber DIM RSUpdate Set RSUpdate = Server.CreateObject("ADODB.Recordset") RSUpdate.CursorType = adOpenStatic RSUpdate.LockType = adLockPessimistic '30 ,Story,Author,Story_Link RSUpdate.Open DimUpdateSQL, Conn RSUpdate("Heading") = DimUpdateHeading RSUpdate("SubTitle") = DimUpdatesubtitle RSUpdate("Brief") = DimUpdatebreif 'RSUpdate("Story") = Dimupdatestory 'RSUpdate("Author") = DimUpdateauthor 'RSUpdate("Story_Link") = DimUpdateMenuLink *********** crashes just below withe RSUpdate.update. *********** RSUpdate.Update RSUpdate.Close Set RSUpdate=Nothing %> <!--#include file="../../../dbclose.pwp"--> <% RESPONSE.REDIRECT "../misc-task-done.asp?confirmtype=updatedother" END IF %>

<!--#include file="../../../dbmultiopen.pwp"--> <%

DIM DimReadSN DimReadSN = REPLACE(REQUEST.QUERYSTRING("sn"), "'", "")

DIM DimReadSQL DimReadSQL= "SELECT Heading,SubTitle,Brief,Story,Author,Story_Link FROM news WHERE Story_ID = " & DimReadSN

DIM RSRead, DimReadHeading, DimReadSubtitle, DimReadBreif, DimReadStory, DimReadAuthor, DimReadLink SET RSRead= SERVER.CREATEOBJECT("ADODB.RECORDSET") RSRead.OPEN DimReadSQL,CONN,,ADLOCKREADONLY DimReadHeading = RSRead("Heading") DimReadSubtitle = RSRead("SubTitle") DimReadBreif = RSRead("Brief") DimReadStory = RSRead("Story") DimReadAuthor = RSRead("Author") DimReadLink = RSRead("Story_Link")

RSRead.CLOSE SET RSRead = NOTHING %> <!--#include file="../../../dbclose.pwp"--> shows the rest of the html page

Fix: None

Synopsis: Submitter-Id: <submitter ID> Originator: G Organization: none MySQL support: [none ] Severity: [serious ] Priority: [ high ] Category: [mysqld, mysql client, Class: [ support ] Release: mysql-3.23.38

Exectutable: [mysqld-opt] Environment: <machine description> System: <Win95, Win98, NT or Win200> Compiler: VC++ 6.0 Architecture: i

--------------------------------------------------------------------- Please check "http://www.mysql.com/Manual_chapter/manual_to> c.html" before

posting. To request this thread, e-mail win3...@lists.mysql.com