Avatar billede l_otto Nybegynder
14. januar 2004 - 14:58 Der er 13 kommentarer og
1 løsning

opret et emne og vedhæft et excel ark

jeg skal bruge lidt kode.. asp

når jeg opretter en bruger skal han kunne vedhæfte et excel ark eller word.

når jeg så "ser" på brugerne skal man kunne se at han har et excel ark vedhæftet, og kunne trykke på linket .

Håber i forstår og kan hjælpe..

har kun 10 p sorry
Avatar billede rbl Praktikant
14. januar 2004 - 21:53 #1
Du skal bruge et uploadmodul til det. Med et uploadmodul kan man lave det sådan, at brugeren vælger en fil, som så bliver uploaded til din server. I din database skal du så gemme filnavnet.

Der er masser af tråde omkring emnet. Prøv at søge efter "upload billede".

Det er ligegyldig hvilken type fil der uploades, de fleste bruger det bare til billeder..
Avatar billede l_otto Nybegynder
15. januar 2004 - 08:38 #2
hmm den er jeg med på men vis mig en tråd hvor det er med excel ellers word og hvor de viser koden også når man så skal se emnet og hvad der er tilknyttet
Avatar billede rbl Praktikant
15. januar 2004 - 22:24 #3
Øh, jeg kan hverken finde hoved eller hale i den sætning. Kan du ikke forklare lidt bedre ?  Og eventuelt bruge et par kommaer og punktummer :-)
Avatar billede l_otto Nybegynder
16. januar 2004 - 08:41 #4
her opretter jeg en (ide/emne) men jeg vil gerne have man kan vedhæfte et word eller excel ark men hvordan...

<%

if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN

strSQL = "Insert into Kontor (Fornavn, telefondato, telefonsub, telefonfelt, telefontid, telefonopret) values('" & Request.Form("Fornavn") & "','" & Request.Form("telefondato") & "','" & Request.Form("telefonsub") & "','" & Request.Form("telefonfelt") & "','" & Request.Form("telefontid") & "','" & Request.Form("telefonopret") & "')"
conn.execute(strSQL)
Alert = "Din ide er nu oprettet "
end if


%>

<center>
<form action="info.asp" method="post"><a href="default.asp" target='_self'><%=Alert%></a>
<TABLE width="500" bgcolor="#FFCC66" class="Formindhold">
<TR>
    <TD bgcolor="#FFCC66"><center> <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="500"><FONT SIZE="1" COLOR="#FF0000"><b>Opret Ide <TABLE>
    <TR>
        <TD width="80"><FONT SIZE="1" COLOR="#000000">Oprettet af<td><select name="Fornavn" class="Formindhold">
                <option value="" selected><FONT SIZE="1" COLOR="#000000">Vælg person</option>
                <option value="Jesper">Jesper</option>
                    <option value="Peter ">Peter </option>
               
              </select></td></TD>    </TR>
       
        <TD ><FONT SIZE="1" COLOR="#000000">Dato<td><input type="text" name="telefondato" class="Formindhold" size="30" value="<%
Response.Write "Den " & FormatDateTime(Now, vbLongDate)
Response.Write " kl. " & FormatDateTime(Now, vbShortTime)
%>">
</td></TD>    </TR>
       
       
        <TD ><FONT SIZE="1" COLOR="#000000">Emne <td><input type="text" name="telefonsub" class="Formindhold" size="72"></td></TD></TR>   
<TD valign="top"><FONT SIZE="1" COLOR="#000000">Ide grundlag<td><textarea name="telefonfelt" rows="7" cols="50"  class="Formindhold"></textarea></td></TD></TR>
<TD valign="top"><FONT SIZE="1" COLOR="#000000">For<td><textarea name="telefontid" rows="7" cols="50"  class="Formindhold"></textarea></td></TD></TR>
<TD valign="top"><FONT SIZE="1" COLOR="#000000">Imod<td><textarea name="telefonopret" rows="7" cols="50"  class="Formindhold"></textarea></td></TD>


    </TR>
   
   
   
    </TR>
    </TABLE>
   
    </TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" name="send" class="knap" >

</form>
Avatar billede l_otto Nybegynder
16. januar 2004 - 08:42 #5
hvis du kan vise mig en trød der kan hjælpe ville jeg sætte stor pris på det.. jeg har selv et upload script men kan ikke få det til at virke sammen med ovenstående
Avatar billede rbl Praktikant
16. januar 2004 - 23:02 #6
Form "hovedet" skal se sådan her ud:
<form method="post" enctype="multipart/form-data" action="info.asp">

Desuden skal du have et felt til at vælge en fil i:
<input type="file" name="fil">

Filen gemmer du på serveren, mens du gemmer filnavnet i databasen sammen med emnet.

Du kan se det hele i denne tråd:
http://www.eksperten.dk/spm/307734
Avatar billede l_otto Nybegynder
18. januar 2004 - 22:39 #7
her er min kode:

<%

if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN

strSQL = "Insert into Kontor (Fornavn, telefondato, telefonsub, telefonfelt, telefontid, telefonopret, note) values('" & UploadRequest.Form("Fornavn") & "','" & UploadRequest.Form("telefondato") & "','" & UploadRequest.Form("telefonsub") & "','" & UploadRequest.Form("telefonfelt") & "','" & UploadRequest.Form("telefontid") & "','" & UploadRequest.Form("telefonopret") & "','" & UploadRequest.Form("note") & "')"
conn.execute(strSQL)
Alert = "Din ide er nu oprettet "
end if


%>

<center>
<form method="post" action="<%=MM_editAction%>" name="form1" enctype="multipart/form-data" onSubmit="checkFileUpload(this,'GIF,JPG,JPEG,BMP,PNG,DOC,PDF,XLS',true,');return document.MM_returnValue"><a href="default.asp" target='_self'><%=Alert%></a>
<TABLE width="500" bgcolor="#FFCC66" class="Formindhold">
<TR>
    <TD class="BoxTop"><center> <TABLE>
    <TR>
        <TD valign="top" class="BoxTop"width="500"><FONT SIZE="1" COLOR="#FF0000"><b>Opret Ide <TABLE>
    <TR>
        <TD width="80"><FONT SIZE="1" COLOR="#000000">Oprettet af<td><select name="Fornavn" class="Formindhold">
                <option value="" selected><FONT SIZE="1" COLOR="#000000">Vælg person</option>
                <option value="Jesper">Jesper</option>
                    <option value="Peter ">Peter </option>
               
              </select></td></TD>    </TR>
       
        <TD ><FONT SIZE="1" COLOR="#000000">Dato<td><input type="text" name="telefondato" class="Formindhold" size="30" value="<%
Response.Write "Den " & FormatDateTime(Now, vbLongDate)
Response.Write " kl. " & FormatDateTime(Now, vbShortTime)
%>">
</td></TD>    </TR>
       
       
        <TD ><FONT SIZE="1" COLOR="#000000">Emne <td><input type="text" name="telefonsub" class="Formindhold" size="72"></td></TD></TR>   
<TD valign="top"><FONT SIZE="1" COLOR="#000000">Idegrundlag<td><textarea name="telefonfelt" rows="7" cols="100"  class="Formindhold"></textarea></td></TD></TR>
<TD valign="top"><FONT SIZE="1" COLOR="#000000">For<td><textarea name="telefontid" rows="7" cols="100"  class="Formindhold"></textarea></td></TD></TR>
<TD valign="top"><FONT SIZE="1" COLOR="#000000">Imod<td><textarea name="telefonopret" rows="7" cols="100"  class="Formindhold"></textarea></td></TD></TR>
<td nowrap align="right"><font color="#333333">Indsæt fil:
                                  </font></td>
                                <td>
                                  <input type="file" name="note" size="35" class="Fields" onChange="checkOneFileUpload(this,'GIF,JPG,JPEG,BMP,PNG,DOC,PDF,XLS',true,'',150,100,640,480,'PIC_WIDTH','PIC_HEIGHT')">
                                 
                               
                                </td>

    </TR>
   
   
   
    </TR>
    </TABLE>
   
    </TD>
    </TR>
    </TABLE>
    <input type="submit" value="Gem" name="submit" class="Buttons" >



</form>
Avatar billede l_otto Nybegynder
18. januar 2004 - 22:40 #8
og her er min fejl:

Request object error 'ASP 0207 : 80004005'

Cannot use Request.Form

/idebank/info.asp, line 253

Cannot use Request.Form collection after calling BinaryRead.
Avatar billede l_otto Nybegynder
18. januar 2004 - 22:40 #9
help
Avatar billede rbl Praktikant
18. januar 2004 - 22:58 #10
Det er fordi når du bruger enctype="multipart/form-data" (hvilket du skal gøre), kan man ikke hente værdierne med Request.Form mere. Det er op til hvilket upload modul, du bruger/har. Jeg kan ikke se noget upload modul i din kode.

Har du læst tråden i det link jeg gav dig ?  Der er vist hvordan man bruger et upload modul (Persits.Upload)
Avatar billede l_otto Nybegynder
20. januar 2004 - 12:07 #11
jeg har selv læst det.. :-)
Avatar billede l_otto Nybegynder
20. januar 2004 - 12:07 #12
løst det :-)
Avatar billede rbl Praktikant
20. januar 2004 - 20:43 #13
Der er vel ingen grund til at udlove point, hvis du selv tager dem alligevel...
Avatar billede l_otto Nybegynder
21. januar 2004 - 08:39 #14
men jeg løste det selv i mellem tiden da du ikke svarede i 1 1/2 døgn.... og jeg brugte ikke noget at det du kunne tilbyde.. så det er der vel ikke noget galt i..:-)
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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