[Resolvido] O que há de errado nessa linha ?

[Carlos E. Vono 0]

COMPONENTE ASPUPLOAD

 

<%
Server.ScriptTimeout = 960 'valor em segundos
%>
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save "e:\home\dominio\web\admin\ARQ_CLIENTES"
%>
<%
For Each File in Upload.Files
Response.Write Right(File.Path,Len(File.Path)-InstrRev(File.Path,"\"))
Next
%>

 

ATÉ AI DÁ CERTO. MAS EU PRECISO COLOCAR O RESPONSE.WRITE EM UMA VARIÁVEL, DAI QUANDO COLOCO ASSIM:

Nome_Arquivo = Response.Write Right(File.Path,Len(File.Path)-InstrRev(File.Path,"\"))

DÁ O SEGUINTE ERRO:

 

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/admin/assessoria_envia_arquivo3.asp, line 64

Nome_Arquivo = Response.Write Right(File.Path,Len(File.Path)-InstrRev(File.Path,"\"))

------------------------------^

 

O QUE FAZER PARA ARRUMAR ISSO?

 

ATT,

GRINGO

[Vinicius Ianni 189]

Veja só, o response.write é um metodo usado para exibir uma informação na tela, não sendo possivel usa-lo com parte de uma variavel, portanto, dessa forma está errado:

 

Nome_Arquivo = Response.Write Right(File.Path,Len(File.Path)-InstrRev(File.Path,"\"))

 

Tente fazer assim:

 

Nome_Arquivo = Right(File.Path,Len(File.Path)-InstrRev(File.Path,"\"))
Response.write Nome_Arquivo

[Carlos E. Vono 0]

resolvido, obrigado.