Avatar billede cdc Novice
19. august 2003 - 13:18 Der er 15 kommentarer og
1 løsning

fejl i upload script

Når jeg vil uploade et billed får jeg følgende fejl:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'ts.Write'

/eliten/herrer/profil/profiler/fileupload.asp, line 131

Koden ser således ud:
        Set fs = CreateObject("ISSecureFile.FileSystemObject") 'Filsystem objekt
        Set ts = fs.CreateTextFile(strFileSpec, True) 'Åbn outputfil, overskriv evt. eksisterende
        For i = intStartPos To intEndPos - 1
            ts.Write(Chr(AscB(MidB(bstrPostData, i, 1)))) 'Skriv data eet tegn af gangen
        Next
        ts.Close 'Luk outputfil

Hvad kan heg gøre ?

/cdc
Avatar billede dk_akj Nybegynder
19. august 2003 - 13:30 #1
Tror du skal bruge writestring istedet.
http://www.baygan.com/TextStream.htm#WriteString

//akj
Avatar billede erikjacobsen Ekspert
19. august 2003 - 13:30 #2
Med ISSecureFile skal du vist bruge WriteString

http://www.baygan.com/TextStream.htm#WriteString
Avatar billede cdc Novice
19. august 2003 - 13:42 #3
sådan her så ?? :
object.Write(Chr(AscB(MidB(bstrPostData, i, 1)))) 'Skriv data eet tegn af gangen
Avatar billede dk_akj Nybegynder
19. august 2003 - 13:44 #4
ts.WriteString(Chr(AscB(MidB(bstrPostData, i, 1)))) 'Skriv data eet tegn af gangen

//akj
Avatar billede cdc Novice
19. august 2003 - 13:51 #5
det ser ud til at virke, nu får jeg bare denne:

Active Server Pages error 'ASP 0113'

Script timed out

profiler/upload.asp

The maximum amount of time for a script to execute was exceeded. You can change this limit by specifying a new value for the property Server.ScriptTimeout or by changing the value in the IIS administration tools.

hvordan kan jeg forhindre det ?

/cdc
Avatar billede cdc Novice
19. august 2003 - 13:51 #6
Jeg smutter lige et pr. timer, og vender stærkt tilbage
Avatar billede dk_akj Nybegynder
19. august 2003 - 13:52 #7
session.timeout(x) hvor x er den timeout du ønsker.

//akj
Avatar billede erikjacobsen Ekspert
19. august 2003 - 13:53 #8
Hvor mange tegn skriver du ud, og hvor kommer de egentlig fra?
Avatar billede cdc Novice
19. august 2003 - 14:00 #9
det er upload af billed fra pc til en mappe på server
Avatar billede erikjacobsen Ekspert
19. august 2003 - 14:28 #10
Du kan ikke udskrive bstrPostData i eet hug?
Avatar billede cdc Novice
19. august 2003 - 17:15 #11
har brugt et andet script i stedet som viker nu:


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

Upload.Save Server.MapPath(relativSti)

Set File = Upload.Files("FILE1")
If Not File Is Nothing Then
  filStiNavn = relativSti & file.Name

  Response.Write "Filen er gemt."
Else
  Response.Write "Ingen fil valgt."
End If
%>
Avatar billede cdc Novice
19. august 2003 - 17:16 #12
smid lige nogle svar som tak for hjælpen ellers :o)
Avatar billede dk_akj Nybegynder
19. august 2003 - 20:05 #13
Oki. Ja det er jo lidt mere simpelt at bruge en komponent :-)

//akj
Avatar billede erikjacobsen Ekspert
19. august 2003 - 21:27 #14
Ingen point til mig, tak. Jeg var alt for mega-langsom med det første indlæg ;))
Avatar billede dk_akj Nybegynder
19. august 2003 - 21:51 #15
Jeg siger tak :-)

//akj
Avatar billede cdc Novice
19. august 2003 - 22:05 #16
:o)
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