Avatar billede kibber Nybegynder
26. juni 2003 - 10:51 Der er 15 kommentarer og
1 løsning

Oversættelse af 5 liners VBScript til JavaScript

Jeg er ved at lave en mailformular, hvor brugeren kan vedhæfte en fil. Jeg har brug for at få upload-delen oversat fra VBScript til java script:

Dim mySmartUpload
Dim intCount

Set mySmartUpload =
Server.CreateObject("aspSmartUpload.SmartUpload")

mySmartUpload.Upload

intCount = mySmartUpload.Save("/../../Databaser/Upload")
Avatar billede mm12010 Nybegynder
26. juni 2003 - 10:59 #1
var mySmartUpload;
var intCount;

mySmartUpload =
Server.CreateObject("aspSmartUpload.SmartUpload");

mySmartUpload.Upload();

intCount = mySmartUpload.Save("/../../Databaser/Upload");
Avatar billede kibber Nybegynder
26. juni 2003 - 13:22 #2
Tak for oversættelse. Desværre virker det ikke endnu. Skal jeg ikke fortælle den, at den skal "fange" filen fra min formular?
Avatar billede kibber Nybegynder
26. juni 2003 - 13:23 #3
Min kode ser således ud:

var funktion = Request.querystring("mailfunktion")

var svar = Request.querystring("svar")

var harfejl = false

if(funktion == "sendmail")
{
  var mySmartUpload;
  var intCount;

  mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload");

  mySmartUpload.Upload();

  intCount = mySmartUpload.Save("/../../Databaser/Upload");

  var msg = Server.CreateObject("JMail.Message");
 
  msg.logging = true;
  msg.silent = true;
  msg.from = Request.Form("email");
  msg.fromname = Request("navn");
  msg.addrecipient("hk@vikadata.dk");
  msg.subject = "Besked fra website";
  msg.body = Request("mailcontent");

  if(!msg.Send("mail.tele.dk"))
  {
      harfejl = true
  }
 
  else
  {
      harfejl = false

      Response.redirect( "Kontakt.asp?svar=Mange tak for din besked. Vi vender hurtigst muligt tilbage.");
  }
}
Avatar billede mm12010 Nybegynder
26. juni 2003 - 13:30 #4
det tror jeg ikke
Avatar billede kibber Nybegynder
26. juni 2003 - 13:33 #5
Ved den det bare? Ovenstående kode virker nemlig ikke:

Request object error 'ASP 0207 : 80004005'

Cannot use Request.Form

/Sider/Kontakt/Kontakt.asp, line 28

Cannot use Request.Form collection after calling BinaryRead
Avatar billede mm12010 Nybegynder
26. juni 2003 - 13:34 #6
Request.Form

skal være

mySmartUpload.Form
Avatar billede kibber Nybegynder
26. juni 2003 - 13:37 #7
Request object error 'ASP 0208 : 80004005'

Cannot use generic Request collection

/Sider/Kontakt/Kontakt.asp, line 29

Cannot use the generic Request collection after calling BinaryRead.
Avatar billede kibber Nybegynder
26. juni 2003 - 13:48 #8
Ups.. havde glemt .Form ved "navn" og "email". Nu virker det! Du er bare go'!
Avatar billede mm12010 Nybegynder
26. juni 2003 - 13:49 #9
tjeck evt. dokumentation på www.aspsmart.com
Avatar billede kibber Nybegynder
26. juni 2003 - 13:50 #10
Ok, tak for tippet.
Avatar billede mm12010 Nybegynder
26. juni 2003 - 13:53 #11
så lidt - takker for points :o)
Avatar billede kibber Nybegynder
26. juni 2003 - 14:14 #12
Det virker jo godt nok, men jeg får en javaScript fejl på klientsiden.
Avatar billede kibber Nybegynder
26. juni 2003 - 14:31 #13
Nå ja, og jeg skal jo også sende en eller anden form for reference med, så den dukker op i "Vedhæftede filer" i mailen.
Avatar billede mm12010 Nybegynder
26. juni 2003 - 14:33 #14
opret hellere et nyt spg hvor du beskriver dit problem mv.
Avatar billede kibber Nybegynder
26. juni 2003 - 14:35 #15
Ok.
Avatar billede kibber Nybegynder
26. juni 2003 - 14:49 #16
Undskyld, hvis jeg "tog hele hånden".
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
Vi tilbyder markedets bedste kurser inden for webudvikling

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