erro

[Mário Monteiro 179]

não começar de novo basta acrescenta um codigo de poucas linhas no lugar dessa pra renomear a figura...

[enrrike 0]

então me passa esse código ahe que "salva como" a imagemmas não quero fazer tudo de novo.quero continuar com o dundas mesmomas será que vai rodar no dundas esse seu código ?t+no aguardo valeu

[Mário Monteiro 179]

pra renomear um arquivo no serverSet fso = CreateObject("Scripting.FileSystemObject") Set fileObject = fso.GetFile(Server.MapPath("\chris\") & "\myfile.txt") Response.Write fileObject.Name fileObject.Name = "myfile2.txt" Response.Write fileObject.Name Set fileObject = Nothing Set fso = Nothing

[enrrike 0]

CARA ISSO NÃO DA DANDO CERTO NÃO

 

EU PRESCISO ENCAIXAR ISSO :

arq = cStr(vimg_ren)	  Session("nom_arq") = arq	  objUploadedFile.SaveAs arquivo_up & arq

DENTRE DESSE SEU CÓDIGO:

Set fso = CreateObject("Scripting.FileSystemObject")Set fileObject = fso.GetFile(Server.MapPath("\chris\") & "\myfile.txt")Response.Write fileObject.NamefileObject.Name = "myfile2.txt"Response.Write fileObject.NameSet fileObject = NothingSet fso = Nothing

MAS CARA NÃO TO SABENDO NEM ENTENDENDO NÃO.

 

MINHA PROGRAMAÇÃO NÃO PODE FUGIR DAQUELE CÓDIGO ACIMA.

 

TEM QUE SER MAIS OU MENOS AQUILO.

 

CARA O QUE EU PRESCISO É SOMENTE DO "SALVE AS " DO DUNDAS..

 

 

MAIS OU MENOS ASSIM:

For Each objUploadedFile in objUpload.Files		Set fso = CreateObject("Scripting.FileSystemObject")		Set fileObject = fso.GetFile(Server.MapPath("\CAMINHO DA PASTA DA IMAGEM\"))	Response.Write fileObject.Name		fileObject.Name = cStr(vimg_ren)	arq = fileObject.Name		objUploadedFile.SaveAs arquivo_up & arq ( mas esse método SaveAs é que o Dundas não ta aceitando )	 Next

T+

[Mário Monteiro 179]

em vez de

 

ASP

[*] arq = cStr(vimg_ren)

[*] Session("nom_arq") = arq

[*] objUploadedFile.SaveAs arquivo_up & arq

 

poe

 

ASP

[*]

[*]arq = cStr(vimg_ren)

[*]Session("nom_arq") = arq

[*]

[*]Set fso = CreateObject("Scripting.FileSystemObject")

[*]Set fileObject = fso.GetFile(arquivo_up & arq)

[*]

[*]Response.Write fileObject.Name

[*]fileObject.Name = "novonome.extenção"

[*]Response.Write fileObject.Name

[*]

[*]Set fileObject = Nothing

[*]Set fso = Nothing

 

ai voce tira os writes pra não escrever na tela e poe ali o novo nome com a extenção

 

isso vai renomear...

[enrrike 0]

em vez disso:

fileObject.Name = "novonome.extenção"

colocar isso:

fileObject.Name = arq

será que rola ???

 

mas ta errado uma parada

arq = cStr(vimg_ren)

já é o novo nome da figura, é só você acompanhar a programação desde o inicio

 

cara ta ficando uma zona essa parada

 

rsrsrsrsrs

 

t+

[Mário Monteiro 179]

não tinha visto issoentão em cima você poe o nome original e embaixo o novo nome...

[enrrike 0]

VOU REPASSAR MAIS UMA VEZ O QUE EU QUERO.O CERTO SERIA SALVAR SOMENTE AS IMAGENS RENOMEADAS NA PASTA : IMG , POIS ASSIM O USUARIO NAO TERIA PROBLEMAS SE ELE CADASTRASSE VARIAS FOTOS DIFERENTES COM O MESMO NOME, POIS ELAS NAO SERIA SALVAS NA PASTAS E SIM ESSAS IMAGENS RENOMEADAS.MAS ESSE COMANDO: objUpload.Save "e:home\pointerimoveis1\web\outros\funcionarios\img"NAO FUNCIONA SE EU TIRAR FORA: e:home\pointerimoveis1\web\outros\funcionarios\img"SE FICAR SOMENTE : objUpload.Save , ELE DA ERRO, MAS EU JÁ FIZ ISSO MUITO TEMPO ATRÁZ , COLOCANDO SOMENTE UPL.SAVEISTO QUE DIZER QUE ELE NAO SALVAVA AS IMAGENS NA PASTA, APENAS DIZIA QUE SALAVA.E MAIS BAIXO COM ESTES COMANDOS QUE ESTAO ESPALHADOS PELA MINHA PROGRAMAÇÃO:arquivo_up = "e:home\pointerimoveis1\web\outros\funcionarios\imagens" vimg_ren = "img"&vcod_img&"."&tpo_arqarq = cStr(vimg_ren) objUpload.SaveAS arquivo_up & arqELE SALAVA SOMENTE AS IMAGENS RENOMEADAS NA PASTAMAS NESSA LINHA: objUpload.SaveAS arquivo_up & arq , ESTA DANDO UM ERRO QUE NAO SUPORTA O COMANDO .SAVEAS CONCERTEZA EXISTE ESSE COMANDO, MAS ELE CONCERTEZA AKI ESTA ESCRITO ERRADO ENTAO O QUE NÓS PRECISAMOS É CORRIGIR SOMENTE ESTA LINHA: objUpload.SaveAS arquivo_up & arqPARA QUE ELE SALVE A IMAGEM RENOMEADA NA PASTA IMGE TB DESCOBRIR POR QUE ELE NÃO TA ACEITANDO FICAR SOMENTE ASSIM: "UPL.SAVE" LÁ EM CIMA ( POR QUE AKI SÓ QUEREMOS DIZER QUE ESTAMOS SALVANDO ) T+