Jump to content


_UsP_

Member Since 28/05/2003
Offline Last Active 13/12/2006, 23:40
-----

Topics I've Started

Sosasp Curce...

28/04/2004, 16:16

E ae pessoal, bem vamos um pouco de historia. Eu na minha epoca que comecei a estudar ASP, muita pouca gente ajudava se é que me entende, bem por isso agora eu gosto de ajudar essa galera que prática ASP. E minha equipe de programacao e eu decidimos abrir um projeto FREE para os novatos em ASP...

São aulas que comecão do inicio ( o que é ASP? ) até o "fim" ( FSO [FileSystemObject] ). Elas são executadas por min, o professor. E __THE_BOSS__ é o monitor. Nossa turma está com menos de 10 alunos. Eu estou postando aqui esse Topico para ver se alguem novato em ASP se enteresaria em entrar no curso.

A primeira aula comeca Sabado, as aulas sao nos dias de sabados e domingos das 7:00 às 9:00.

Voces devem estar se perguntando. Onde seram feitas as aulas? eu respondo que serão feitas no mirc conectados na rede BRASNET no canal #SoSASP.
[ quem não tem o mirc : www.mirc.com ]

PS: So permanecerar na aula quem fazer a matricula.

- Eu estou dispondo um BOT com 29 funcoes do ASP cadastradas ( depois ponho mais )
- Um servidor para voces hospedarem suas pagina e praticarem ( Temporario, so para estudo )

- Tera testes e provas tambem. Não é esses cursos de diploma, mais gostaria de saber se voces estao aprendendo e quais sao as dificuldades ( nada melhor do que uma tradicionau avaliacao :P )

Espero que essa minha iniciativa, interese os usuarios do mxstudio que querem aprender ASP... se matricularem e aprenderem a linguagem ASP.

OBS: O curso eu acho que deve ser somente para novatos em ASP, pois, vou comecar do inicio mesmo, entao se algum avancado se matricular e achar as aulas chatas é por conta disso... porem voces podem se matricularem conversar com migo e falar que so quer comecar a ir para as aulas quando eu comecar algum assunto que interesem a voces... ok?

Bem inicialmente é isso, quem estiver interesado post aqui ok?
E se eu esqueci de dar alguma informacao , tambem me fale :P ehhehe

g0 comunidade WMONLINE (y)

Equipe SoSASP:
_UsP_
__THE_BOSS__
dragon_white
ZxCooL

Scripting.filesystemobject

04/04/2004, 13:28

E ae gente boa ;)

tipo me diz ae porque está dando erro nesse code que eu tenho 90% de certeza que está certo???

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Caminho = Server.MapPath(Session("NomePastaAlvo")&"/"&Session("NomeArquivoAlvo")&".asp")
Set AbrirPagina = FSO.OpenTextFile(caminho,TRUE)
Conteudo = AbrirPagina.ReadAll

O erro é esse ae:

Tipo de erro:
Erro de tempo de execução do Microsoft VBScript (0x800A0005)
Chamada de procedimento ou argumento inválido
/SoSASP/Area Do Aluno/Modificar.asp, line 7
Linha 7:
Set AbrirPagina = FSO.OpenTextFile(caminho,TRUE)

Porque???? :(
T+ ;)
To esperando retorno :)

Scripting.filesystemobject

01/04/2004, 16:48

Ae gente boa :)

Tipo, gostaria de renomear um arquivo .txt
Eu usei a seguinte sintaxe ( porem não sei se tar certo )

Nome = Replace(Request("nome"),"'","''")
sqlVerificar = "Select*From Arquivos WHERE arquivo='"&nome&".txt'"
Set Verificar = Conexao.Execute(sqlVerificar)
if not Verificar.eof then
Response.Redirect "index.asp?Erro=1"
else
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Pasta = FSO.GetFolder("C:\Inetpub\wwwroot\SoSASP\CodigosFontes\FSO")
Set Arquivos = Pasta.files
Set Arquivo = Arquivos.iten(Session("NomeArquivoAlvo"))
Arquivo.Name = Nome
sql = "UPDATE Arquivos SET Arquivo='"&nome&".txt' WHERE Arquivo='"&Session("NomeArquivoAlvo")&"'"
Set RenomearAlvo = Conexao.Execute(sql)
Response.Redirect "index.asp"
end if

Da um help ae :)

Sintaxe... ( Scripting.filesystemobject )

31/03/2004, 22:23

Tipo. Gostaria de saber porque está dando esse erro:

Tipo de erro:
Erro de tempo de execução do Microsoft VBScript (0x800A0005)
Chamada de procedimento ou argumento inválido
/SoSASP/CodigosFontes/FSO/CriarArquivo.asp, line 67

O script é esse:
Nome = Replace(Request("nome"),"'","''")
Texto = Replace(Request("conteudo"),"'","''")
sqlVerificar = "Select*From Arquivos WHERE arquivo='"&nome&".txt'"
Set Verificar = Conexao.Execute(sqlVerificar)
if not Verificar.eof then
Response.Redirect "index.asp?Erro=1"
else
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Caminho = Server.MapPath(Nome&".txt")
Set CriarArquivo = FSO.OpenTextFile(Caminho,2,TRUE,2)
CriarArquivo.WriteLine(Texto)
Session("NomeArquivoAlvo") = Nome&+".txt"
sqlInserir = "INSERT INTO Arquivos(arquivo) VALUES ('"&nome&".txt')"
Set Inserir = Conexao.Execute(sqlInserir)
Response.Redirect "index.asp"
end if

Vlw ae (y)
Aguardo resposta ;)

Iis Emplica Com Scripting...

31/03/2004, 21:24

ae galera....
Tava fazendo um code, e nele tinha Scripting.FileSystemobject.
porem eu fui rodar ele no meu IIS. ele ficou horas enchendo a barrinha. e nada...
Me irritei fechei a pagina. e quando fui testar qualquer outra pagina em asp que estava no meu IIS não funcionada. Dizia que a página não pode ser exibida!

:angry: To com a maior raiva disso. pior que eu desistalei e instalei ele e nada.
Tipo será que quand instala precisa configurar algo nele pra aceitar Scripting...

Sinceramente "NÃO SEI O QUE FAZER :("
Fuiz T+ :(

IPB Skin By Virteq