thicomp

Utilize caracteres especiais nas palavras acentuadas. Procure na net que você acha bastante coisa a respeito Abçs

É um método sem componentes

Pessoal, preciso de uma sugestão suas. Tenho um formulário de upload e preciso que ele valide duas opções Tipo e o caminho do arquivo. O usuário não pode prosseguir enquano estes campos não forem cobertos. Bom, meu problema é que eu preciso fazer esta validação na 2º página, ou seja, antes do upload e depois do envio do formulário. Será que alguém pode me ajudar??? Abçs B)

Galera, o código está aí... Espero que seja útil Dim objteste, objname, fso set objteste = createobject("scripting.FileSystemObject") set objname = createobject("scripting.FileSystemObject") set fso = createobject("scripting.FileSystemObject") 'Verifica se arquivo existe na pasta especifica if objteste.FileExists ("F:\teste\teste\"& doc &"\"& teste &"") = true then Set fileobject = fso.GetFile("F:\teste\teste\"& doc &"\"& teste &"") 'Renomeia arquivo antigo fileobject.Name = ""& day(now) &"_"& month(now) &"_"& year(now) &"_"& teste &"" teste1 = ""& day(now) &"_"& month(now) &"_"& year(now) &"_"& teste &"" 'Move arquivo antigo para a pasta alt objteste.MoveFile "F:\teste\teste\"& doc &"\"& teste1 &"","F:\teste\teste\"& doc &"\alt\" 'Move arquivo atual para a pasta específica objteste.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" else 'Move arquivo para pasta específica objteste.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" end if set fileObject = nothing set objteste = nothing set objname = nothing set fso = nothing

Pessoal, problema resolvido Se alguém precisar do código, poste aí

Continua me retornando o mesmo erro

Pessoal, estou com este código aqui mas ele está me retornando um erro. Alguém poderia me ajudar??. O problema ocorre nesta parte em vermelho. <% Const forWriting=2, forAppending=8 Dim objteste, objname, fso set objteste = createobject("scripting.FileSystemObject") set objname = createobject("scripting.FileSystemObject") set fso = createobject("scripting.FileSystemObject") 'Verifica se arquivo existe na pasta especifica if objteste.FileExists ("F:\teste\teste\"& doc &"\"& teste &"") = true then Set fileobject = fso.GetFile("F:\teste\teste\"& doc &"\"& teste &"") 'Renomeia arquivo antigo objname.Name = ""& day(now) &"_"& month(now) &"_"& year(now) &"_"& teste &"" teste1 = ""& day(now) &"_"& month(now) &"_"& year(now) &"_"& teste &"" 'Move arquivo antigo para a pasta alt objteste.MoveFile "F:\teste\teste\"& doc &"\"& teste1 &"","F:\teste\teste\"& doc &"\alt\" 'Move arquivo atual para a pasta específica objteste.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" else 'Move arquivo para pasta específica objteste.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" end if set objteste = nothing set fileObject = nothing %> O ERRO Microsoft VBScript runtime error '800a01b6' Object doesn't support this property or method: 'Name' /Cristalia/teste/teste/upload.asp, line 76 Alguém teria alguma sugestão pra me dar?? Abçs

Ele não executa o "if" Ele passa pelo if sem dar msg alguma e me retorna um erro qd chega no else. Mais precisamente nesta linha. FSO.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" Neste código tem um problema que estou tentando renomear com a data atual, mas mesmo sem este comando, alterando de outra forma ele me retorna o mesmo erro. ERRO Microsoft VBScript runtime error '800a01a8' Object required: '' /teste/teste/upload.asp, line 65 Vlw

Tentei mas mesmo assim não deu certo. E mais, não posso retirar aquele comando porque preciso renomear meu arquivo antes de fazer a mudança. Abçs

Pessoal, alguém saberia me dizer o problema deste if Const forWriting=2, forAppending=8 Dim objteste, objstream, FSO, objname set objteste = createobject("scripting.FileSystemObject") if objteste.FileExists ("F:\teste\teste\"& doc &"\"& teste &"") = true then 'Renomeia arquivo antigo objname.name ""& date &"_"& teste &"" teste1 = ""& date &"_"& teste &"" 'Move arquivo antigo para a pasta alt FSO.MoveFile "F:\teste\teste\"& doc &"\"& teste1 &"","F:\teste\teste\"& doc &"\alt\" 'Move arquivo atual para a pasta específica FSO.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" else 'Move arquivo para página específica FSO.MoveFile "F:\teste\teste\"& doc &"\alt\"& teste &"","F:\teste\teste\"& doc &"\" end if Obrigado pela atenção

Pessoal, como faço para renomear um arquivo em asp. que comando devo utilizar??

Bom galera, estou com um problema Um amigo meu dividiu HD para a instalação do linux e windows xp. O XP foi instalado numa partição, dai quando tenta instalar o LINUX na outra, ele começa instalar e logo para, o munitor apaga e fica piscando.... Alguém saberia dizer o que pode ser e o que deve ser feito???

Mas então de onde ele tá retirando o campo "bairro" ??? O código que você está utilizando aí é o mesmo postado aqui???

você retirou a linha toda??? <tr> <tudo>Bairro</tudo> <tudo><input type="text" name="bairro"></tudo> </tr>

Poxa cara, realmente não sei. O problema é que só aí dá o erro. Bom, sei lá, mas tenta retirar o campo bairro pra ver o que acontece.

qualquer campo que você deixar em branco ele retorna a mensagem do campo "bairro"

Sinceramente não sei. Mas com certeza é problema no seu browser. É muito estranho isso, se fosse problema de código era pra aparecer em qualquer um.

Não, ele tá funcionando perfeitamente. Ele me retorna a mensagem sempre do primeiro campo sem preenchimento.

O segundo mesmo, o maior... Não deu erro algum aqui

Seu código funcionou perfeitamente aqui (IE) Posso só te dar uma sugestão??? Coloca um botão "limpar" também. Acho que poderia ajudar. Abçs

Pessoal, alguém poderia dar uma olhada neste código. Bom, é um código de menu. O problema é que está dando erro na linha marcada em vermelho. Será que alguém poderia me dizer o que está errado?? Agradeço pela atenção

Problema resolvido.

Mas o que eu estava pensando é o seguinte: A pag1.asp é a página onde ele vai escolher uma das opções, a pag2.asp iria executar a opção escolhida. Estou tendo problemas na hora da criação dos arquivos txt, porque quando deixo sem opção alguma, ele faz direito, mas quando tenho que passar parametros e cada opção irá executar uma parte diferente, é aí onde esta o problema

Oi Pessoal, estou com um problema com formulário Um usuário seleciona uma de duas opções para preenchimento do formulário (pag1.asp), com isso, os itens serão habilitados para ele com os campos referente a sua escolha (pag2.asp). Após envio deste, é gerado um arquivo txt com as informações inseridas e, caso ainda não exista a pasta específica, ele a cria. O meu problema é o seguinte Já está pronto o formulário para envio de uma das opções. O problema é que não estou conseguindo fazer com que ele faça esta diferenciação. Será que eu teria que usar alguma "function"? Não sei se fui claro. qualquer coisa coloco o codigo que tenho Obrigado pela atenção

Ok Valeu