hi, mittlerweile sind wir schon so weit das es nicht an der komponente liegen kann ... ein normler upload auf platte und nicht in die db funzt auch so weit unbegrenzt.
auch mein anfangsverdacht das er mit mp3-files nicht umgehen kann war falsch, er macht generell probleme bei dateien �ber ca. 80k es liegt wohl nahe das access der �belt�ter ist. hat jemand eine idee wie ich das umgehen kann? oder ne l�sung die ohne komponente funzt? gru� aus n�rnberg > -----Original Message----- > From: Thomas Bandt [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, May 29, 2002 2:55 PM > To: AspGerman Kaffeehaus > Subject: [aspdecoffeehouse] Mp3 in BLOB (Access) > > > 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 > > > | [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed > | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = > Listenarchiv Sie > | k�nnen sich unter folgender URL an- und abmelden: > | > http://www.aspgerman.com/aspgerman/listen/anme> lden/aspdecoffeehouse.as > | p > | [aspdecoffeehouse] als [email protected] subscribed | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv | Sie k�nnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
