GRANT Privilege Go Bye Bye

2003-01-10 Thread Kevin Wixson 
Ummm...what exactly do you do if you end up with a situation where no user 
has GRANT permission? Like, perhaps while experimenting with user 
administration in MySQL, the GRANT privilege was removed from every user?



Thank you,

Kevin Wixson
IT Manager
Norman Camera  Video

(616) 567-5552
1-800-900-6676
Fax: (616) 343-6410
e-mail: [EMAIL PROTECTED]

Visit us on the web at: http://www.normancamera.com  



-
Before posting, please check:
  http://www.mysql.com/manual.php   (the manual)
  http://lists.mysql.com/   (the list archive)

To request this thread, e-mail [EMAIL PROTECTED]
To unsubscribe, e-mail [EMAIL PROTECTED]
Trouble unsubscribing? Try: http://lists.mysql.com/php/unsubscribe.php

RE: Binary Data and BLOB Problem

2002-12-31 Thread Kevin Wixson 
 = InStrB(begPos + 1, value, ChrB(34))
nValue = endPos

Dim nameN
nameN = MidB(value, begPos, endPos - begPos)

Dim nameValue, isValid
isValid = True

If InStrB(1, value, stringToByte(Content-Type))  1 Then

begPos = 1 + InStrB(endPos + 1, value, ChrB(34))
endPos = InStrB(begPos + 1, value, ChrB(34))

If endPos = 0 Then
endPos = begPos + 1
isValid = False
End If

midValue = MidB(value, begPos, endPos - begPos)
intDict.Add FileName, trim(byteToString(midValue))

begPos = 14 + InStrB(endPos + 1, value, stringToByte(Content-Type:))
endPos = InStrB(begPos, value, ChrB(13))

midValue = MidB(value, begPos, endPos - begPos)
intDict.Add ContentType, trim(byteToString(midValue))

begPos = endPos + 4
endPos = LenB(value)

nameValue = MidB(value, begPos, ((endPos - begPos) - 1))
Else
nameValue = trim(byteToString(MidB(value, nValue + 5)))
End If

If isValid = True Then

intDict.Add Value, nameValue
intDict.Add Name, nameN

dict.Add byteToString(nameN), intDict
End If
End If

currentPos = lenSeparator + inStrByte
Wend
End Sub

An effective solution to my problem lies either in what I'm doing wrong 
with MySQL (obviously I'm doing something wrong, else I wouldn't be getting 
errors using the AppendChunk method) or with converting the data into a 
binary type so it can be written to the adTypeBinary type Stream object.


At 05:01 PM 12/30/2002 -0700, you wrote:
BEGIN SHAMELESS PLUG

Hi Kevin;

You may want to look at the online article I wrote at
http://www.dynamergy.com/mike/articles/blobaccessvb.html which covers use of
the stream object in detail. While written for VB, it should be easy enough
to convert to ASP.

Mike Hillyer

END SHAMELESS PLUG


-Original Message-
From: Kevin Wixson [mailto:[EMAIL PROTECTED]]
Sent: Monday, December 30, 2002 10:29 AM
To: [EMAIL PROTECTED]
Subject: Binary Data and BLOB Problem


Thank you,

Kevin Wixson
IT Manager
Norman Camera  Video

(616) 567-5552
1-800-900-6676
Fax: (616) 343-6410
e-mail: [EMAIL PROTECTED]

Visit us on the web at: http://www.normancamera.com  



-
Before posting, please check:
  http://www.mysql.com/manual.php   (the manual)
  http://lists.mysql.com/   (the list archive)

To request this thread, e-mail [EMAIL PROTECTED]
To unsubscribe, e-mail [EMAIL PROTECTED]
Trouble unsubscribing? Try: http://lists.mysql.com/php/unsubscribe.php

Binary Data and BLOB Problem

2002-12-30 Thread Kevin Wixson 

Having trouble with my first MySQL database. I want to upload and install 
image files to a database for online sample photo gallery for our 
customers. The system I've created so far sometimes works, sometimes 
doesn't. It seems to depend on the size of the file being uploaded, but 
tests have been inconclusive. Having trouble diagnosing the problem since 
the error is most often Internal Server Error, which doesn't tell me 
much. Otherwise I get:


Microsoft OLE DB Provider for ODBC Drivers error '80040e21'

[MySQL][ODBC 3.51 Driver][mysqld-4.0.5-beta-max-nt]Lost connection to MySQL 
server during query

/shooters/Insert.asp, line 148

The relevant code is:

' Checking to make sure if file was uploaded
If fileSize  0 Then

set rsImage = Server.CreateObject(ADODB.Recordset)
rsImage.ActiveConnection = MM_connShooters_STRING
rsImage.Source = select * from web_lab.Images limit 0
rsImage.CursorType = adOpenKeyset
rsImage.CursorLocation = adUseClient
rsImage.LockType = adLockPessimistic
rsImage.Open()
rsImage_numRows = 0

' Adding data
rsImage.AddNew
rsImage(userID) = userID
rsImage(imageType) = contentType
rsImage(imageSize) = fileSize
rsImage(imageName) = fileName
rsImage(imageCaption) = caption
Do While lngOffset  fileSize
varChunk = LeftB(RightB(fileData, fileSize - lngOffset), conChunkSize)
rsImage(imageData).AppendChunk varChunk
lngOffset = lngOffset + conChunkSize
Loop

ERROR--rsImage.Update

'adoImageStream.Close
rsImage.Close
Set rsImage = Nothing

Response.Write font color=greenFile was successfully uploaded...
Response.Write /font
Else
Response.Write font color=brownNo file was selected for uploading
Response.Write .../font
End If

My connection string is:

MM_connShooters_STRING = driver={MySQL ODBC 3.51 Driver}; 
database=[name];uid=[id];pwd=[pass];OPTION=16427;

The constant conChunkSize is 100. I have checked the max packet size (set 
to 1550) and as you can see, set cursors to client.

Alternatively, I have also tried to use the stream object, but I haven't 
had any luck there either. I'm sure I'm not doing it right.



Thank you,

Kevin Wixson
IT Manager
Norman Camera  Video

(616) 567-5552
1-800-900-6676
Fax: (616) 343-6410
e-mail: [EMAIL PROTECTED]

Visit us on the web at: http://www.normancamera.com  



-
Before posting, please check:
  http://www.mysql.com/manual.php   (the manual)
  http://lists.mysql.com/   (the list archive)

To request this thread, e-mail [EMAIL PROTECTED]
To unsubscribe, e-mail [EMAIL PROTECTED]
Trouble unsubscribing? Try: http://lists.mysql.com/php/unsubscribe.php