Hello, I've gotten close but I still keep getting the following error.

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Driver Manager] Invalid string or buffer length

/faculty/submit/update/addpicproc.asp, line 55



Here is the code for that:

Response.Buffer = True

Dim load
Set load = new Loader

load.initialize


Dim fileData
fileData = load.getFileData("PicFile")

Dim fileName
fileName = LCase(load.getFileName("PicFile"))

Dim filePath
filePath = load.getFilePath("PicFile")

Dim filePathComplete
filePathComplete = load.getFilePathComplete("PicFile")

Dim fileSize
fileSize = load.getFileSize("PicFile")

Dim fileSizeTranslated
fileSizeTranslated = load.getFileSizeTranslated("PicFile")

Dim contentType
contentType = load.getContentType("PicFile")

Dim countElements
countElements = load.Count

Dim idInput
idInput = load.getValue("FacultyID")

Set load = Nothing

Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn=("server=localhost;db=aviation;driver=MySQL ODBC 3.51 Driver;uid= ;pwd=")

Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open "Facultypics", Conn, 2, 2

rs.AddNew
rs("FileName") = fileName
rs("FileSize") = fileSize
rs("FileData").Appendchunk fileData
rs("ContentType") = contentType
rs("FacultyID") = idinput
rs.Update

rs.Close
Set rs = Nothing
Conn.Close

If Err.number = 0 Then
Response.Redirect "faculty/submit/update/index.asp?FacultyID="&idinput&"&Birth="&Request("Birth")
Else
Response.Write "Could not insert into Database. Errors occured ...<br>"
End If