serraventura Postado Setembro 9, 2004 Denunciar Share Postado Setembro 9, 2004 (editado) ........Microsoft VBScript compilation error '800a0401' Expected end of statement /upload.asp, line 11 Count = Upload.SaveVirtual "/arqs/"& login &""---------------------------^esse é o script...<%dim login, nome_arqlogin = request.Form("login")Set Upload = Server.CreateObject("Persits.Upload.1")Upload.OverwriteFiles = FalseOn Error Resume NextUpload.SetMaxSize 1048576Count = Upload.SaveVirtual "\arqs\"& login &""%>informações q peguei no site http://www.aspupload.com/object_upload.html#SaveVirtual------------já tentei inverter as barras e nada..... Editado Setembro 9, 2004 por dark0 Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 serraventura Postado Setembro 9, 2004 Autor Denunciar Share Postado Setembro 9, 2004 (editado) deu erro!Microsoft VBScript compilation error '800a0401' Expected end of statement /upload.asp, line 11 Count = Upload.SaveVirtual "./arqs/"& login---------------------------^Fiz isso e parou o erro:Count = Upload.SaveVirtual ("\arqs\"& login &"")porém esta dando outro erro!!tá dando o meu próprio tratamento de erro mais não sei porque!! assim...Houve um erro ao tentar carregar o arquivo: (Tamanho Máximo 1MB)" Unspecified error " <<<<(Err.Description)vou postar o script inteiro!!!<%dim login, nome_arqlogin = request.Form("login") Set Upload = Server.CreateObject("Persits.Upload.1") Upload.OverwriteFiles = false On Error Resume Next Upload.SetMaxSize 3145728 ' Limit files to 1MB Count = Upload.SaveVirtual ("\arqs\"& login &"")%><HTML><BODY BGCOLOR="#FFFFFF" background="BG.gif"><CENTER> <font color="#FFFFFF"><strong><font size="2" face="Tahoma, Arial, Times New Roman"> <% If Err <> 0 Then %> </font></strong><font size="2"><FONT SIZE=2 FACE="Tahoma, Arial, Times New Roman" COLOR=#0020A0> <H3><strong><font color="#FFFFFF" face="Tahoma, Arial, Times New Roman">Houve um erro ao tentar carregar o arquivo: (Tamanho Máximo 1MB)</font></strong></h3> </FONT></font></font> <FONT SIZE=2 FACE="Tahoma, Arial, Times New Roman" COLOR=#0020A0> <h2><font color="#FFFFFF"><strong><font size="2" face="Tahoma, Arial, Times New Roman">" <% = Err.Description %> "</font></strong></font></h2> </FONT> <font color="#FFFFFF"><strong><font size="2" face="Tahoma, Arial, Times New Roman"> <% Else %> </font></strong></font><font size="2"><FONT SIZE=2 FACE="Tahoma, Arial, Times New Roman" COLOR=#0020A0> <h2> <font color="#FFFFFF"><strong><font face="Tahoma, Arial, Times New Roman"> <% = Count %> Arquivo carregado com sucesso.</font></strong></font></h2> </FONT></font> <font color="#FFFFFF"><strong><font size="2" face="Tahoma, Arial, Times New Roman"> <% If Count > 0 Then %> <% Set File = Upload.Files(1) If File.ImageType = "PDF" Then nome_arq = File.filename %> <% End If %> <% Else %> Não existe nenhum arquivo carregado no servidor! <% End If end if %> </font></strong><font size="2" face="Tahoma, Arial, Times New Roman"></font></font> </CENTER></BODY></HTML>--------------------se alguém puder dar um help valeu!Editado: Formate seus textos usando as tags CODE e QUOTE, facilita a leitura. Editado Setembro 9, 2004 por dark0 Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 serraventura Postado Setembro 9, 2004 Autor Denunciar Share Postado Setembro 9, 2004 descobri porque do erro...............mas não to conseguindo resolver.............acho q é problema de concatenação!assim...Count = Upload.SaveVirtual("\arqs\"& Upload.Form("login") &"")esse endereço acima era pra server assim\arqs\nome_do_login_do_clienteporem quando o upload é feito.............invés de copiar o arquivo para\arqs\nome_do_login_do_clienteele copia apenas para\arqs\entaum acredito q seja problema de concatenação!.........tipo estou fazendo algo errado com ASPAS ou && na hora da concatenação........ou entaum deveria concatenar antes e jogar prea uma variavel e depois..... jogar essa variavel para o SAVEVIRTUAL........o q tá rolando é q eu não to conseguindo passar o endereço completo para o SAVEVIRTUALalguém pode me ajudar? Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
serraventura
esse é o script...informações q peguei no site http://www.aspupload.com/object_upload.html#SaveVirtual
------------
já tentei inverter as barras e nada.....
Editado por dark0Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.