hi...

mit nachfolgendem code und sa fileupload will ich mp3's in ne
datenbank schreiben (an alle kritiker, das hat schon seinen
sinn ;))...

problem:

ich kann ohne die tests erfolgreich alle m�glichen sachen
hochladen... nur mp3's nicht. content-type ist audio/mpeg,
er l�uft da auch erfolgreich rein... aber als fehler bekomme
ich:

"Die Argumente sind vom falschen Typ, liegen au�erhalb des 
G�ltigkeitsbereiches oder sind miteinander unvereinbar."

Zeile:

upl.SaveAsBlob objRS.Fields("mp3_data")

hier der gesamte code, ich hoffe es kann mir jemand helfen.

-------------------------------------------------------------

If UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST" Then

        Set upl = Server.CreateObject("SoftArtisans.FileUp")
        upl.Path = "c:\temp"

        If Not upl.IsEmpty Then

                strDB = "Data Source=" & all_dbs & ";"          
                strCon = "Provider=Microsoft.Jet.OLEDB.4.0;" & strDB


                Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open strCon

                Set objRS = Server.CreateObject("ADODB.Recordset")
                        objRS.CursorType = adOpenStatic
                        objRS.cachesize = 5 
                        strSQL = "Select * From mp3 Where mp3_id = 0"
                        objRS.open strSQL, objCon,2,3

                '// Check ob �berhaupt Mp3

                FName = Mid(upl.UserFilename, InstrRev(upl.UserFilename,
"\") + 1)
                FCONT = upl.ContentType 
                
                If LCase(FCONT) = Trim(LCase("audio/mpeg")) Then
                        objRS.AddNew
                        upl.SaveAsBlob objRS.Fields("mp3_data")
                        objRS.Update
                        objRS.Close
                        strMessage = "Das Mp3 wurde erfolgreich
hochgeladen."
                Else
                        upl.delete
                        strMessage = "Die Datei die sie uploaden wollten
entspricht nicht dem Mp3-Format."
                End If
                
                '// Recordset und DB-Connection schliessen
                
                objRS.Close
                Set objRS = Nothing
                objCon.Close
                Set objCon = Nothing
                
        Else
                strMessage = "Das Mp3 welches Sie uploaden wollten war
leer."  
        End If

End If


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an