Avatar billede fun22 Nybegynder
14. juni 2006 - 20:41 Der er 3 kommentarer og
1 løsning

Fejl i asp kode

Hej..

Jeg har et script som gør at jeg kan vedhæfte en fil til en jmail besked..

Men den kommer med en fejl:

Object doesn't support this property or method: 'IsFile'

Her er koden:

<%@LANGUAGE="VBSCRIPT" %>

<HTML>
<BODY>
<%
' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )
Set upload = Server.CreateObject( "aspSmartUpload.SmartUpload" )

' Check for attachments and add them to the email
set attachment = upload.Form( "attachment" )
if attachment.IsFile then <-- HER SKER FEJLEN
  msg.AddCustomAttachment attachment.filename, attachment.item, false
end if

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Get the form variables, using the upload object
Name = session("user")
SenderEmail = session("email")
Subject = upload.Form ("subject")
Recipient = request.querystring("email")
Body = upload.Form("body")

' And apply them to the message
msg.From = SenderEmail
msg.FromName = Name

msg.AddRecipient Recipient
msg.Subject = Subject

msg.Body = Body

' To capture any errors which might occur, we wrap the call in an IF statement
if not msg.Send( "smtp.unoeuro.com" ) then
  Response.write "<pre>" & msg.log & "</pre>"
else
    %>
    <script type="text/javascript">
    alert('Din besked er nu blevet sendt!');
    </script>
    <%
      Response.rediect "contact-frame.asp"
end if


' And we're done! the message has been sent.
%>
</BODY>
</HTML>

Nogen der har et bud?
Avatar billede eagleeye Praktikant
14. juni 2006 - 20:49 #1
Føste skal den hente filen via Files collection og ikke form Collection så vidt jeg husker. Når det er ASPSmartUpload har den ikke IsFile men den har en anden property IsMissing, se evt. file objectet for ASPSmartUpload:
http://www.aspsmart.com/aspSmartUpload/liblocal/docs/Objects.htm#File



Så prøv at rette de to linjer:


set attachment = upload.Form( "attachment" )
if attachment.IsFile then <-- HER SKER FEJLEN
  msg.AddCustomAttachment attachment.filename, attachment.item, false
end if



Til dette:

set attachment = upload.Files( "attachment" )
if not attachment.IsMissing then
  msg.AddCustomAttachment attachment.filename, attachment.item, false
end if
Avatar billede fun22 Nybegynder
14. juni 2006 - 21:16 #2
så får jeg en ny fejl :(

aspSmartUpload.Files error '800404b5'

Invalid Files Name 'attachment' (Error 1205)

/send-mail.asp, line 13

set attachment = upload.Files( "attachment" )
Avatar billede fun22 Nybegynder
26. juni 2006 - 17:05 #3
er du der?
Avatar billede eagleeye Praktikant
27. juni 2006 - 18:04 #4
Prøv at tjekke at fil input feltet hedder "attachment"

Hvad er navnet på den fin du førsøger at uploade?
Er der nogle spiciel karakter i filnanvet?
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