Hjälp ?
Alltså, jag e ju ganska ny på det här och sånt ser att en del kikat in på ämnet. Men kan inte någon snälla hjälpa mig ? Om det är något av det luddiga jag skrev som ni inte förstår kan ni väl be mig förklara närmare.
7 svar · 335 visningar · startad av CatZ
Så här ser uppladdningen ut och den fungerar bra, men jag vill lägga till en hyperlänk i tabellen "Mall och (Fältnamn) Resultat samtidigt som jag kör uppladdningen nedan till tabellen "Upload"
<%
Select Case Request("cmd")
Case ""
%>
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="upload2.asp?cmd=upload">
File:<BR><INPUT TYPE=FILE NAME="fil"><P>
<INPUT TYPE=SUBMIT VALUE="Upload!">
</FORM>
<%
Case "upload"
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 100000, True
Count = Upload.Save
Set File = Upload.Files("fil")
If Not File Is Nothing Then
Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".\databas\wbbas.mdb")
Set rs = Server.CreateObject("adodb.recordset")
'Optional: check whether this file already exists using MD5 hash
Hash = File.MD5Hash
rs.Open "SELECT * from Upload WHERE Hash='" & Hash & "'", Connect, 2, 3
If Not rs.EOF Then
Response.Write "This file already exists in the database."
Response.End
End If
rs.Close
' Reopen recordset to insert file
rs.Open "Upload", Connect, 2, 3
rs.AddNew
rs("UdBlob") = File.Binary
rs("UdNamn") = File.FileName
rs("UdStorlek") = File.Size
rs("hash") = Hash
rs.Update
Response.Write "File saved."
Else
Response.Write "File not selected."
End If
Länken kommer se ut så här:
<A HREF="download.asp?UdId=1">Resultat</A>
och använda sig av Scriptet download.asp som ser ut så här:
<%
Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".\databas\wbbas.mdb")
Set db = Server.CreateObject("ADODB.Connection")
db.Open Connect
SQL = "SELECT * FROM Upload where UdId = " & Request("UdId")
Set rs =db.Execute( SQL )
Response.ContentType = "application/octet-stream"
Response.AddHeader "Content-Disposition", "attachment;filename=" & Trim(rs("UdNamn"))
Response.AddHeader "Content-Length", rs("UdStorlek")
Response.BinaryWrite rs("UdBlob")
%>
Tabellen Mall har ju ett Id-Fältnamn och ett Resultat-Fältnamn som har Datatypen Hyperlänk, hur lägger jag till en hyperlänk i tabell1 under Fältnamn Resultat samtidigt som jag laddar upp i Tabell2?
Hjälp ?
Alltså, jag e ju ganska ny på det här och sånt ser att en del kikat in på ämnet. Men kan inte någon snälla hjälpa mig ? Om det är något av det luddiga jag skrev som ni inte förstår kan ni väl be mig förklara närmare.
Varför vill du lägga in detta i en till tabell?
Ditt andra script kör ju mot den första tabellen?
Hur som helst, om du lägger in detta efter:
rs.Update
i din kod:
UdId= rs("UdId")
rs.Close
rs.Open "Mall", Connect, 2, 3
rs.AddNew
rs("Id") = UdId
rs("Resultat") = File.FileName
rs.Update
så lägger du in id-nummer samt filens namn i den andra tabellen.
Solly...
Jag ska ta det här som exempel. Jag spelar i klan!
Vi har en Kalender med CW's (Clan Wars) och när en CW är spelad så vill jag kunna ladda upp Screenshots från CW'n så att folk bara behöver klicka på en länk för att se Screenshot i deras Webläasare. Alltså¨behöver jag egentligen inte skriva till 2 olika tabeller. Jag kan göra allt i samma tabell, men jag måste skriva länken till databasen oxo.
Och när jag sparat Länken i Databasen vill jag att jag ska kunna se en länk till mitt Screenshot under rätt tövling så att säga.
Vet inte om det hjälper er att hjälpa mig bättre ?
Du skulle klara dig endast med en tabell.
Vad får du för felmeddelanden?
Har du rätt contenttype?
För bilder gif och jpeg så ser contenttype ut så här:
.gif= "image/gif"
.jpg= "image/pjpeg"
cya,
PatrikB
en liten sakt till, lite OT.
Innan du kör en Response.End så "bör" du stänga ned alla dina object
cya,
PatrikB
Ok, men du behöver defenitivt inte lägga in en hyperlink i databasen, det räcker ju att länka till bildens/postens id i Uploadtabellen.
<A HREF="download.asp?UdId=1">Resultat</A>
Ska du ha flera bilder kopplade till varje match (eller olika antal för den delen.) kanske du ska överväga en relationstabell.
Hmm
Äsch jag som är dum, det är ju så logiskt att jag borde skjutas för att jag inte fatta direkt :)
Ska försöka nu får vi se. Tack för hjälpen!!