Notifikationer

Markér alle som læst Log ud

digitalmann Nybegynder

07. september 2006 - 22:31 Der er 35 kommentarer og
1 løsning

fejl ved upload

hejsa
jeg bruger en formular til at skrive lidt tekst og uploade 1 billede, men jeg får en fejl.
Jeg skal have navnet på den uploadede fil ind i en html tekst istedet for som her:

<table style="background-position: center 50%;background-image:url('http://www.kbonline.dk/qxl/filnavn.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table></p>

troede jeg at jeg kunne bruge:

<table style="background-position: center 50%;background-image:url('http://www.servernavn.dk/<%response.write upload.Files('foto1').ExtractFilename.jpg%>');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table></p>

men det virker ikke, jeg får denne fejl:
Siden kan ikke vises
Der er problemer med den side, du prøver at åbne, og den kan ikke vises.

Synes godt om

madeindk Nybegynder

07. september 2006 - 22:40 #1

Vi skal lige starte med at få fejlen ud af din Explorer.

Gør følgende i din IE, så vil den vise fejlen i stedet for den der side: Funktioner -> Internetindstillinger -> Avanceret -> Fjern kryds i "vis meddelelse om uskadelige HTTP-fejl"

Synes godt om

digitalmann Nybegynder

07. september 2006 - 22:43 #2

Microsoft VBScript compilation error '800a03ea'

Syntax error

/lavhtml.asp, line 51

response.write upload.Files('foto1').ExtractFilename.jpg
----------------------------^

Synes godt om

madeindk Nybegynder

07. september 2006 - 22:43 #3

Men det er nok sådan noget her vi skal ud i for at få det til at virke :-)

<table style="background-position: center 50%;background-image:url('http://www.servernavn.dk/<%= Upload.Files("foto1") & ExtractFileName & ".jpg" %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

Synes godt om

digitalmann Nybegynder

07. september 2006 - 22:43 #4

hmmm pilen rammer ' tegnet i min browser

Synes godt om

digitalmann Nybegynder

07. september 2006 - 22:46 #5

den stopper meget tidlig i den tekst der skal skrives:
<body>

<font face="Arial" size=2>
<p>Persits.Upload.1</font> <font face="Arial" size=2>error '800a003d'</font>
<p>
<font face="Arial" size=2>Wrong Content-Type. Make sure you have included the attribute ENCTYPE="multipart/form-data" in your form.</font>
<p>
<font face="Arial" size=2>/lavhtml.asp</font><font face="Arial" size=2>, line 36</font>

Synes godt om

madeindk Nybegynder

07. september 2006 - 22:49 #6

Det er på grund af din form ikke ser sådan her ud:

<form method="post" enctype="multipart/form-data" action="dinUploadSide.asp">

Synes godt om

digitalmann Nybegynder

07. september 2006 - 22:52 #7

det hjalp, nu uploades billedet, men den stopper stadig samme sted:

<body>

<table border="10" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor=" <font face="Arial" size=2>
<p>Request object</font> <font face="Arial" size=2>error 'ASP 0208 : 80004005'</font>
<p>
<font face="Arial" size=2>Cannot use generic Request collection</font>
<p>
<font face="Arial" size=2>/lavhtml.asp</font><font face="Arial" size=2>, line 34</font>
<p>
<font face="Arial" size=2>Cannot use the generic Request collection after calling BinaryRead.
</font>

Synes godt om

madeindk Nybegynder

07. september 2006 - 22:54 #8

Et sted i din upload kode står der request.form, det skal der ikke stå. Der skal stå:

Upload.Form("navnPaaFeltet")

Synes godt om

digitalmann Nybegynder

07. september 2006 - 22:56 #9

kan det være denne:
<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Request.Form("tekst1"),VbCrLf,"<br>")%></font></p>

Synes godt om

madeindk Nybegynder

07. september 2006 - 22:56 #10

Og for at sikre dig mod personer der kun vil dig så ondt så erstat det med følgende kode: Replace(Upload.Form("navnPaaFeltet"), "'", "''")

Synes godt om

madeindk Nybegynder

07. september 2006 - 22:57 #11

Det er den, jeg retter den lige til :-)

<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

Synes godt om

digitalmann Nybegynder

07. september 2006 - 22:57 #12

nææ det hjalp ikke at udskifte det :-(

Synes godt om

madeindk Nybegynder

07. september 2006 - 23:00 #13

Prøv at smid al din upload kode - så kigger jeg videre på det i morgen. Skal sgu i seng nu - trænger til søvn...

Men øverst skulle der gerne stå noget med: Set Upload = Server.CreateObject("Persits.Upload") eller noget der ligner det meget i hvert fald - og ordet 'Upload' skal sættes ind i: Replace(Upload.Form("ditFelt"),"'","´")

Det vil sige hvis der står: Set EkspertenUpload = Server.CreateObject("Persits.Upload") skal der stå: Replace(EkspertenUpload.Form("ditFelt"),"'","´")

Synes godt om

madeindk Nybegynder

07. september 2006 - 23:01 #14

Husk desuden at slette din database kode og det, hvis du har sådan noget eller erstat den med x'er :-)

Godnat.

Synes godt om

digitalmann Nybegynder

07. september 2006 - 23:02 #15

her er det hele:

<html>

<head>
<meta http-equiv="Content-Language" content="da">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Ny side 3</title>
</head>

<body>
<p>
<textarea rows="33" name="S1" cols="104">

<html>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>tekst</title>
</head>

<body>

<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")
%>

<table border="10" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="<% = request("farveramme")%>" width="65%" id="AutoNumber1" bordercolorlight="<% = request("farveramme")%>" bordercolordark="<% = request("farveramme")%>">
<tr>
<td width="100%">
<p align="center"><u><font size="7" color="<% = request("farveoverskrift")%>"><b><%response.write request("overskrift")%></b></font></u></p>
<p align="center">

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxl/1.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table>

<p align="center"> </p>
<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>
<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= Upload.Files("foto1") & ExtractFileName & ".jpg" %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxl/1.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table>

<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

<p> </td>
</tr>
</table>

</body>

</html>

</textarea></p>
</p>
</body>

</html>

Synes godt om

digitalmann Nybegynder

07. september 2006 - 23:07 #16

du skal ikke tage dig af rodet med de billeder der ikke findes på serveren, jeg er slet ikke fæørdig endnu, men det burde kunne ses hvad jeg skal have det til når jeg bliver færdig :-)

Synes godt om

digitalmann Nybegynder

08. september 2006 - 00:23 #17

sorry - næsten færdig
jeg kom længere, nurvirker formen og upload, men jeg får stadig fejl ved at fremskaffe filnavnet:

Her er resultatet af forsøget:
<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/ <font face="Arial" size=2>
<p>Microsoft VBScript runtime </font> <font face="Arial" size=2>error '800a01b6'</font>
<p>
<font face="Arial" size=2>Object doesn't support this property or method</font>
<p>
<font face="Arial" size=2>/lavhtml.asp</font><font face="Arial" size=2>, line 80</font>

-

jeg bruger nu denne kode:

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= Upload.Files("foto1") & ExtractFileName & ".jpg" %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

Synes godt om

madeindk Nybegynder

08. september 2006 - 06:48 #18

<body>

<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

Set File = Upload.Files("foto1")

strFilnavn = File.Filename
strExtension = lCase(File.ImageType)
%>

<table border="10" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="<% = request("farveramme")%>" width="65%" id="AutoNumber1" bordercolorlight="<% = request("farveramme")%>" bordercolordark="<% = request("farveramme")%>">
<tr>
<td width="100%">
<p align="center"><u><font size="7" color="<% = request("farveoverskrift")%>"><b><%response.write request("overskrift")%></b></font></u></p>
<p align="center">

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxl/1.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table>

<p align="center"> </p>
<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>
<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= Upload.Files("foto1") & ExtractFileName & ".jpg" %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxl/1.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table>

<p align="center"><font color="<% = request("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

<p> </td>
</tr>
</table>

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= strFilnavn & strExtension %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

</body>

Synes godt om

digitalmann Nybegynder

08. september 2006 - 12:40 #19

jeg får denne fejl:
Request object error 'ASP 0208 : 80004005'
Cannot use generic Request collection

/lavhtml.asp, line 15

Cannot use the generic Request collection after calling BinaryRead.

Synes godt om

madeindk Nybegynder

08. september 2006 - 13:49 #20

Hvilket upload komponent bruger du??

Synes godt om

madeindk Nybegynder

08. september 2006 - 13:50 #21

Hov - nej, det står der jo i toppen - sorry.

Jeg kigger på det når jeg er hjemme på et tidspunkt senere i aften.

Synes godt om

madeindk Nybegynder

08. september 2006 - 15:52 #22

Alle steder du vil requeste på en form, på en side hvor der optræder et upload scriptet skal du skrive: Upload.Form("feltetsNavn")

Har rettet dit script i gennem:

<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

Set File = Upload.Files("foto1")

strFilnavn = File.Filename
strExtension = lCase(File.ImageType)
strUrl = strFilnavn & strExtension
%>

<table border="10" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="<%= Upload.Form("farveramme") %>" width="65%" id="AutoNumber1" bordercolorlight="<%= Upload.Form("farveramme") %>" bordercolordark="<%= Upload.Form("farveramme") %>">
<tr>
<td width="100%">
<p align="center"><u><font size="7" color="<% = Upload.Form("farveoverskrift")%>"><b><%= Upload.Form("overskrift") %></b></font></u></p>
<p align="center">

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxl/1.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table>

<p align="center"> </p>
<p align="center"><font color="<%= Upload.Form("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>
<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= strUrl %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

<p align="center"><font color="<%= Upload.Form("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxl/1.jpg');background-repeat: no-repeat;height:428;width:755px" border="0"><tr>
<td height="581"></td></tr></table>

<p align="center"><font color="<%= Upload.Form("farvetekst")%>" size="5"><%=Replace(Upload.Form("tekst1"),VbCrLf,"<br>")%></font></p>

<p> </td>
</tr>
</table>

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= strFilnavn & strExtension %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

<%
Set Upload = Nothing
%>

Synes godt om

digitalmann Nybegynder

08. september 2006 - 17:53 #23

Følgende kommer ud af denne lille test, det ser ud til at .jpg kommer for mange gange?

top

dfg

sdfg

sdfg
Pict0026(3).JPGjpg

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

<html>

<head>
<meta http-equiv="Content-Language" content="da">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Ny side 3</title>

<html>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title></title>
</head>

<body>

<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

Set File = Upload.Files("foto1")

strFilnavn = File.Filename
strExtension = lCase(File.ImageType)
strUrl = strFilnavn & strExtension

%>

<% = upload.form("overskrift") %><br>
<br>
<% = upload.form("tekst1") %><br>
<br>
<br>
<% = upload.form("tekst2") %><br>
<br>
<br>
<% = upload.form("sluttekst") %><br>

<% = strFilnavn & strExtension %>

</body>

</html>

Synes godt om

madeindk Nybegynder

08. september 2006 - 18:16 #24

Ja, det kunne det godt se ud som om - og den kan ikke vise billedet?

Synes godt om

madeindk Nybegynder

08. september 2006 - 18:19 #25

Men ellers prøv med...

<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

Set File = Upload.Files("foto1")

strFilnavnTemp = Split(File.Filename,".")
strFilnavn = FilnavnTemp(0)
strExtension = lCase(File.ImageType)
strUrl = strFilnavn & strExtension
%>

Synes godt om

madeindk Nybegynder

08. september 2006 - 18:20 #26

Rettelse - var sgu lige lidt for hurtig ;-)

<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

Set File = Upload.Files("foto1")

strFilnavnTemp = Split(File.Filename,".")
strFilnavn = strFilnavnTemp(0)
strExtension = lCase(File.ImageType)
strUrl = strFilnavn & strExtension
%>

Synes godt om

madeindk Nybegynder

08. september 2006 - 18:25 #27

Du kan også bare sige fx. - det er egentlig ligegyldt med strExtension, den kan bare hentes hvis du ønsker at gemme billede extensionen i en db fx :-)

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= strFilnavn %>');background-repeat: no-repeat;height:428;width:755px" border="0">

<tr>
<td height="581"> </td>
</tr>

</table>

Synes godt om

digitalmann Nybegynder

08. september 2006 - 21:20 #28

nu hjælper det, nu skal jeg blot have billede 2-6 ind også, hvad skal jeg gøre der?
(jeg forhøjer lige til 200 point, det er vist fortjent :-)

<html>

<head>
<meta http-equiv="Content-Language" content="da">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Ny side 3</title>
</head>

<body>
<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

Set File = Upload.Files("foto1")

strFilnavnTemp = Split(File.Filename,".")
strFilnavn = strFilnavnTemp(0)
strExtension = lCase(File.ImageType)
strUrl = strFilnavn & strExtension
%>

<div align="center">
<center>
<table border="3" cellspacing="1" width="800" id="AutoNumber1" bordercolor="<% = upload.form("farveramme") %>">
<tr>
<td width="942">
<p align="center"><font color="<% = upload.form("farveoverskrift") %>" size="7"><% = upload.form("overskrift") %></font><br></p>

<table style="background-position: center 50%;background-image:url('http://www.dk-service.dk/qxlfotos/<%= strFilnavn %>.jpg');background-repeat: no-repeat;height:428;width:755px" border="0">
<tr>
<td height="581"> </td>
</tr>

</table>

<p align="center"><font size="5" color="<% = upload.form("farvetekst") %>"><% = upload.form("tekst1") %></font><br>

</p>

<p align="center">billede2</p>

<p align="center"><font size="5" color="<% = upload.form("farvetekst") %>"><% = upload.form("tekst2") %></font><br>

<p align="center">billede3</p>

<p align="center"><font size="5" color="<% = upload.form("farvebund") %>"><% = upload.form("sluttekst") %></font><br>

<p align="center">billede4</p>

<p align="center">5</p>

<p align="center">6</td>
</tr>
</table>
</center>
</div>

</body>

</html>

Synes godt om

madeindk Nybegynder

08. september 2006 - 22:14 #29

2-6 - hvad mener du med det?

Synes godt om

digitalmann Nybegynder

08. september 2006 - 22:40 #30

jeg har i startformularen 6 billede uploads

denne viser kun billede1 ikke 2,3,4,5,6 (der hvor jeg har skrevet "billede 2", "billede 3" osv

Synes godt om

madeindk Nybegynder

08. september 2006 - 22:56 #31

Ok, men så er vi ude i noget med du skal få puttet det her ind på en pæn måde.

<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 2048576
Upload.Save server.mappath("/qxlfotos/")

For Each File in Upload.Files

strFilnavnTemp = Split(File.Filename,".")
strFilnavn = strFilnavnTemp(0)
strExtension = lCase(File.ImageType)
strUrl = strFilnavn & strExtension

response.write(strUrl)

Next
%>

Synes godt om

digitalmann Nybegynder

09. september 2006 - 00:11 #32

den forstod jeg ikke lige?
Priblemet er jo at jeg skal bruge alle værdierne (filnavnene) og de skal strikkes ind i een html side:

tekst 1
(billede 1)
tekst 2
(billede 2)
tekst 3
(billede 3)
(billede 4)
(billede 5)
(billede 6)

Dvs. at der skal være tekst imellem de forskellige billeder.
Hvis det skal flettes ind i den kode jeg satte ind kl. 21.20 hvordan skal det så se ud?

Synes godt om

digitalmann Nybegynder

09. september 2006 - 00:15 #33

måske kan du bedre forstå hvad jeg mener ved at kikke her :
http://www.dk-service.dk/lavhtml.htm

Det er denne foremular der skal bruges, hvis du udfylder den, og trykker på knappen kan du se hvad resultatet skal være.

Synes godt om

digitalmann Nybegynder

09. september 2006 - 09:54 #34

1000 tak for hjælpen indtil videre, jeg har lige oprettet det sidste i et nyt spg. http://www.eksperten.dk/spm/731279

jeg har også oprttet et spg. hvor du kan få dine velfotjente ekstra point :
http://www.eksperten.dk/spm/731280

svar venligst på spg, og inkasser velfortjente point :-)

Synes godt om

digitalmann Nybegynder

10. september 2006 - 20:46 #35

hmm du skulle jo også svare på denne :-)

Synes godt om

madeindk Nybegynder

10. september 2006 - 23:31 #36

Her er mit svar ;-)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	I går 21:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS