12. marts 2003 - 12:06
Der er
8 kommentarer og 1 løsning
wscript i asp
jeg har et visual basic script som jeg godt vil have eksekveret via asp. men når jeg kopierer scriptet ind og gemmer som .asp får jeg fejlen Microsoft VBScript runtime error '800a01a8' Object required: 'wscript' /sms/smssend.asp, line 7 koden ser ud således: <% Dim smssender Dim retVal Dim stdOut Set smssender = CreateObject("PCBSMS.Sender") Set stdOut = wscript.stdout det som om den slet ik kender til wscript!? Er det noget der skal installeres på IIS'en eller hvordan foregår det?
Annonceindlæg fra Lenovo
12. marts 2003 - 12:16
#1
Jeg mener slet ikke det er muligt at kode i wscript i asp, du kan angive vbscript eller jscript ved hjælp af @language . Men wscript har jeg aldrig hørt om kunne bruges
12. marts 2003 - 14:12
#2
argh hvad gør man så hvis man vil have eksekveret den kode via en webside?
12. marts 2003 - 14:13
#3
omskriver den til asp, Dim smssender Dim retVal Dim stdOut Set smssender = server.CreateObject("PCBSMS.Sender") forudsat at PCBSMS.Sender er installeret på serveren
12. marts 2003 - 14:14
#4
ved dog ikke lige hvad jeg skal gøre med : Set stdOut = wscript.stdout det kommer lidt an på hvad scriptet ellers skal lave
12. marts 2003 - 14:49
#5
scriptet skal sende en sms via et andet visual basic program som kører på maskinen. du kan få koden til scriptet her Dim smssender Dim retVal Dim stdOut Set smssender = wscript.CreateObject("PCBSMS.Sender") Set stdOut = wscript.stdout smssender.Message = "Test sendt: " & NOW() smssender.MobileNr = "20750978" smssender.SMSCenterIP = "10.254.2.220" retVal = smssender.Send kan det omskrives til asp?
12. marts 2003 - 14:54
#6
Dim smssender Dim retVal Set smssender = wscript.CreateObject("PCBSMS.Sender") smssender.Message = "Test sendt: " & NOW() smssender.MobileNr = "20750978" smssender.SMSCenterIP = "10.254.2.220" retVal = smssender.Send det er stort set det samme i asp, jeg kan dog ikke se hvad du skal bruge den her til i asp : Set stdOut = wscript.stdout
12. marts 2003 - 14:54
#7
Dim smssender Dim retVal Set smssender = server.CreateObject("PCBSMS.Sender") smssender.Message = "Test sendt: " & NOW() smssender.MobileNr = "20750978" smssender.SMSCenterIP = "10.254.2.220" retVal = smssender.Send
12. marts 2003 - 15:40
#8
tak det virker så'en der :)
12. marts 2003 - 16:57
#9
selv tak
Kurser inden for grundlæggende programmering