cyberalexxx

Festas.asp

Agradeço as sugestões de todos. Semana q vem vou fazer uns orçamentos e ver o que eu decido. []'s e Feliz Natal a todos (Sb agora só dia 27/12 quando eu sarar da bebedeira)

Vide tópico: http://scriptbrasil.com.br/forum/index.php...ndpost&p=221443

Acho q você se floodereu!!! (desculpe o termo) Que tal postar um tópico decente, na seção adequada, vendo se alguém pode te ajudar??

Para tirar o cabeçalho e rodapé se for possível é so com Javascript já vi varias discussões sobre isso em foruns de JS e infelizmente nunca vi uma solução que funcionasse

já estou a mais de 2 anos com meu PC e ele já esta meio "capenga", no momento não tenho encaixes monetários suficientes para aquisicão de um novo equipamento. alguém poderia sugerir algum tipo de upgrade que traga melhora de performance com um custo não muito alto. minha atual configuração: Se alguém puder me ajudar com sugestões agradeço. []'s

Como a duvida é so formatação o problema não é ASP, vou mover para a sessão html. []'s

Eu uso o EditPad Pro para programação e gosto muito, para html quando quero um layout mais elaborado eu apelo para o FrontPage.

para entender o global.asp você tera que entenderr o que é APPLICATION / SESSION APPLICATION Ao conjunto de páginas ASP de um mesmo diretório virtual damos o nome de Aplicação ASP. Tal aplicação será iniciada na primeira vez que um usuário tentar acessar alguma página desse diretório virtual. Será finalizada quando o servidor web for desligado. O objeto Application existe para nos possibilitar o armazenamento e recuperação de valores relacionadas a uma aplicação ASP. Com ele podemos criar variáveis de qualquer subtipo cujo valor pode ser acessado ou modificado por qualquer usuário conectado ao diretório virtual. Para criar uma variável do nível de aplicação, devemos escrever comandos com seguinte sitaxe: Application(“NOME_DA_VARIAVEL”) = VALOR_DA_VARIAVEL Uma vez criada, tal variável estará acessível a qualquer usuário da aplicação. Seu valor ficará armazenado até que o servidor web seja desligado. Como o conteúdo desse tipo de variável pode ser modificado por qualquer usuário conectado à aplicação, poderia haver alguma confusão se vários usuários tentassem alterar esse valor ao mesmo tempo. Para evitar possíveis problemas com a “concorrência", o objeto application disponibiliza dois métodos: LOCK e UNLOCK. O primeiro bloqueia as variáveis de nível de aplicação para o usuário que invoca tal método. Se qualquer outro “usuário” tentar acessar variáveis desse nível, ficará esperando até a aplicação ser desbloqueada. A aplicação só será desbloqueada quando o script que a bloqueou termina sua execução, ou quando ocorre o “TimeOut”, ou quando o script invoca o método UNLOCK. Ainda relacionado a esse objeto existem dois eventos: Application_OnStart Ocorre quando a aplicação é iniciada, ou seja, quando um diretório virtual é acessado pela primeira vez. Application_OnEnd Ocorre quando a aplicação é finalizada, ou seja, quando o web server é desligado. Um evento é uma subrotina automaticamente chamada quando o sistema sofre alguma ação especifica. Tais subrotinas não são escritas diretamente nas páginas ASP mas num arquivo a parte nomeado de GLOBAL.ASA. Sendo assim, quando um diretório virtual for acessado pela primeira vez, o Servidor Web procura em tal diretório a existência desse arquivo. Se encontra, abre o arquivo e procura a subrotina Application_OnStart para executar seus comandos. A mesma coisa acontece quando desligamos o servidor web, só que ele chama a subrotina Application_OnEnd. No exemplo a seguir criamos uma variável de nível de aplicação chamada DataHoraI para armazenar a Data/Hora em que a aplicação foi iniciada. Outra variável chamada Titulo para armazenar o titulo da aplicação ASP. E uma variável chamada Correio que armazena o e-mail do Web Master: Exemplo : Global.asa <script LANGUAGE=VBSCRIPT RUNAT=SERVER> Sub Application_OnStart() Application("DataHoraI")=Now Application("Titulo")="Curso de ASP" Application("Correio")="mailto:lineus@seduc.pi.gov.br" End Sub </SCRIPT> Exemplo : Application1.asp <% @LANGUAGE=VBSCRIPT %> <HTML><HEAD><TITLE><%=Application("Titulo")%></TITLE></HEAD> <BODY> Essa aplicação ASP foi iniciada em <B><%=Application("DataHoraI")%></B><BR> <A Href="<%=Application("Correio")%>">Web Master</a> </BODY> </HTML> Obs : Só poderá existir um arquivo Global.asa em cada diretório virtual Observe que o trabalho de manutenção do site pode ficar facilitado. Imagine que todas as páginas asp do seu diretório virtual possuem um padrão de cores, links, cabeçalho, etc. Sendo assim, as páginas teriam muito código em comum. Se desejarmos modificar os padrões do nosso site, teríamos que fazer alterações em todos os arquivos do diretório virtual. Mas se utilizarmos variáveis de nível de aplicação para armazenar essas configurações, não necessitamos mudar todos os arquivos do diretório, mas só o arquivo GLOBAL.ASA. Exemplo : Global.asa <script LANGUAGE=VBSCRIPT RUNAT=SERVER> Sub Application_OnStart() Application("DataHoraI")=Now Application("Titulo")="I Curso de ASP da UFPI" Application("Correio")=mailto:lineulima@yahoo.com Application("CorFundo")="Black" Application("CorTexto")="Yellow" Application("TamFonte")="4" End Sub </SCRIPT> Exemplo : Application2.asp <% @LANGUAGE=VBSCRIPT %> <HTML><HEAD><TITLE> <%=Application("Titulo")%> </TITLE></HEAD> <BASEFONT SIZE=<%=Application("TamFonte")%> COLOR=<%=Application("CorTexto")%>> <BODY BGCOLOR=<%=Application("CorFundo")%>> Essa aplicação ASP foi iniciada em <B><%=Application("DataHoraI")%></B><BR> <A Href="<%=Application("Correio")%>">Web Master</a> </BODY> </HTML> SESSION Toda vez que um usuário Web se conecta a um aplicativo ASP é iniciada uma sessão para o mesmo no servidor Web. Para representar tal sessão, o ASP possui um objeto interno chamado Session. Na verdade, ele é muito parecido com o objeto Application. A diferença esta em dizer que esse objeto pode armazenar valores ligados apenas a um único visitante do site(o dono da sessão). Com ele podemos criar variáveis de qualquer subtipo cujo valor pode ser acessado ou modificado somente pelo “dono” da sessão. Para criar uma variável do nível de sessão, devemos escrever comandos com seguinte sitaxe: Session(“NOME_DA_VARIAVEL”) = VALOR_DA_VARIAVEL As variáveis de sessão permanecerão na memória(ativas) até a sessão ser encerrada. Isso pode acontecer quando o usuário fechar o web browser, quando ocorre o “TIMEOUT” da sessão, ou quando o script invoca o método ABANDON do objeto Session. A propriedade TIMEOUT é usada quando o usuário fica parado sem fazer nada no Browser. O default é vinte minutos, mas esse valor pode ser modificado da seguinte forma: Session.Timeout = VALOR_MINUTOS Ainda relacionado a esse objeto existem dois eventos: Session_OnStart Ocorre quando a sessão é iniciada Session_OnEnd Ocorre quando a sessão é finalizada. A exemplo dos eventos do objeto Application, eles também devem ser escritos como subrotinas de um arquivo GLOBAL.ASA. O exemplo ilustra o conceito de sessão. Temos uma variável a nível de aplicação chamada contador. Ela serve para informar a quantidade de pessoas que acessaram essa aplicação ASP. A idéia é incrementar o valor dessa variável toda vez que uma sessão é iniciada. Também utilizamos uma variável de sessão que informa a hora em que a sessão em questão foi aberta. Exemplo : Global.asa <script LANGUAGE=VBSCRIPT RUNAT=SERVER> Sub Application_OnStart() Application("DataHoraI")=Now Application("Titulo”)="I Curso de ASP da UFPI" Application("Correio")=mailto:lineulima@yahoo.com Application("CorFundo")="Black" Application("CorTexto")="Yellow" Application("TamFonte")="4" Application("Contador")=0 End Sub Sub Session_OnStart() Application("Contador")=Application("Contador")+1 Session("HoraS")=Time End Sub </SCRIPT> A página a seguir encerra a sessão através do método ABANDON: Exemplo sessao1.asp <% @LANGUAGE=VBSCRIPT %> <HTML><HEAD><TITLE> </TITLE></HEAD> Essa sessão foi iniciada às <%=Session("HoraS")%><BR> Você é o visitante de número <%=Session("Contador")%><BR> Desde <%=Application("DataHoraI")%> <HR> <A HREF="sessao2.asp">Encerrar Sessão</A> </BODY> </HTML> FONTE: Curso de ASP da UFPI escrito por LINEU ANTONIO DE LIMA SANTOS

Olha aki um exemplo funfando em um looping: <% dim frases(2) frases(0)="o mundo precisa de genios humildes, hoje em dia somos poucos" frases(1)="O que eu mais admiro na minha perfeição é minha modéstia" frases(2)="Se for dirigir não beba, se for beber me chame" tamanho=30 for each frase in frases texto2 = left(frase,Cint(tamanho)) texto3 = InStrRev(texto2,chr(32),CInt(tamanho)) if len(frase) >= Cint(tamanho) then response.write left(frase,Cint(texto3))&"...<br><br>" else response.write left(frase,Cint(texto3))&"<br><br>" end if next %>

Usar a busca do forum também é facil!!!

Aki tem um bom tutorial indicado pelo Dark0 em outro post: http://www.construindoseusite.com.br/iis/i...talando_xp.shtm

Resposta 1: pegue o total de registros através da propriedade RecordCount, depois crie um contador dentro do loop e faça a comparação entre a variavel contador e o total de registros. Resposta 3: Acho que só com session não tem jeito, tenta alguma coisa com Application. Resposta 4: já fiz isso para um membro aki do forum, da uma olhada se você entende a lógica Resposta 5: melhor criar um tópico na sessão de JS

Acho que u tenho um desse, só que ta no "meu barraco", tenho o CD original dele e o driver ta rodando legal no XP, me manda PM com seu email que te passo o driver a noite, se for esse modelo mesmo, mais tenho quase certeza que é.

fechado!! se precisar manda PM pra alguém da moderação abrir o tópico.

Muito estranho isso, porque o navegador recebe o código html já processado pelo servidor, entaum fica aki a duvida se o problema realmente é com o navegador, voce rodou o mesmo script em outro navegador???

o melhor é ver qual componente o servidor que ira hospedar o site possui, pois não adianta voce conseguir baixar o componente, pois dificilmente voce vai conseguir que o servidor instale o componente pra você. rode esse script no servidor e veja quais componentes estão instalados: <%Dim comList(55) comList(0) = Array( "AB Mailer","ABMailer.Mailman" ) comList(1) = Array( "ABC Upload","ABCUpload4.XForm" ) comList(2) = Array( "ActiveFile","ActiveFile.Post" ) comList(3) = Array( "ActiveX Data Object","ADODB.Connection" ) comList(4) = Array( "Adiscon SimpleMail","ADISCON.SimpleMail.1" ) comList(5) = Array( "ASP DNS", "AspDNS.Lookup" ) comList(6) = Array( "ASP HTTP","AspHTTP.Conn" ) comList(7) = Array( "ASP Image","AspImage.Image" ) comList(8) = Array( "ASP Mail","SMTPsvg.Mailer" ) comList(9) = Array( "ASP NNTP News", "AspNNTP.Conn" ) comList(10) = Array( "ASP POP 3", "POP3svg.Mailer" ) comList(11) = Array( "ASP Simple Upload","ASPSimpleUpload.Upload" ) comList(12) = Array( "ASP Smart Cache","aspSmartCache.SmartCache" ) comList(13) = Array( "ASP Smart Mail","aspSmartMail.SmartMail" ) comList(14) = Array( "ASP Smart Upload","aspSmartUpload.SmartUpload" ) comList(15) = Array( "ASP Tear","SOFTWING.ASPtear" ) comList(16) = Array( "ASP Thumbnailer","ASPThumbnailer.Thumbnail" ) comList(17) = Array( "ASP WhoIs","WhoIs2.WhoIs" ) comList(18) = Array( "ASPSoft NT Object","ASPSoft.NT" ) comList(19) = Array( "ASPSoft Upload","ASPSoft.Upload" ) comList(20) = Array( "CDO NTS","CDONTS.NewMail" ) comList(21) = Array( "Chestysoft Image","csImageFile.Manage" ) comList(22) = Array( "Chestysoft Upload","csASPUpload.Process" ) comList(23) = Array( "Dimac JMail","JMail.Message" ) comList(24) = Array( "Distinct SMTP","DistinctServerSmtp.SmtpCtrl" ) comList(25) = Array( "Dundas Mailer","Dundas.Mailer" ) comList(26) = Array( "Dundas Upload","Dundas.Upload.2" ) comlist(27) = Array( "Dundas PieChartServer", "Dundas.ChartServer.2") comlist(28) = Array( "Dundas 2D Chart", "Dundas.ChartServer2D.1") comlist(29) = Array( "Dundas 3D Chart", "Dundas.ChartServer") comList(30) = Array( "Dynu Encrypt","Dynu.Encrypt" ) comList(31) = Array( "Dynu HTTP","Dynu.HTTP" ) comList(32) = Array( "Dynu Mail","Dynu.Email" ) comList(33) = Array( "Dynu Upload","Dynu.Upload" ) comList(34) = Array( "Dynu WhoIs","Dynu.Whois" ) comList(35) = Array( "Easy Mail","EasyMail.SMTP.5" ) comList(36) = Array( "File System Object","Scripting.FileSystemObject" ) comList(37) = Array( "Ticluse Teknologi HTTP","InteliSource.Online" ) comList(38) = Array( "Last Mod","LastMod.FileObj" ) comList(39) = Array( "Microsoft XML Engine","Microsoft.XMLDOM" ) comList(40) = Array( "Persits ASP JPEG","Persits.Jpeg" ) comList(41) = Array( "Persits ASPEmail","Persits.MailSender" ) comList(42) = Array( "Persits ASPEncrypt","Persits.CryptoManager" ) comList(43) = Array( "Persits File Upload","Persits.Upload.1" ) comList(44) = Array( "SMTP Mailer","SmtpMail.SmtpMail.1" ) comList(45) = Array( "Soft Artisans File Upload","SoftArtisans.FileUp" ) comList(46) = Array( "Image Size", "ImgSize.Check" ) comList(47) = Array( "Microsoft XML HTTP", "Microsoft.XMLHTTP" ) comList(48) = Array( "Zaks POP3 ", "zakspop3.Server" ) comList(49) = Array( "MS XML ", "MSXML_PROGID2" ) comList(50) = Array( "ASPUpLoad ", "ASPUpLoad.clsUpload" ) comList(51) = Array( "MSXML2 ", "MSXML2.ServerXMLHTTP" ) comList(52) = Array( "AspCrypt ", "AspCrypt.Crypt" ) comList(53) = Array( "AspZip ", "aspZip.EasyZIP" ) comList(54) = Array( "Imagem Glue ", "ImageGlue5.Canvas" ) comList(55) = Array( "Image Effects", "ImageEffects.FX" ) Function TestObject( comIdentity ) On Error Resume Next TestObject = False Err.Clear Set xTestObj = Server.CreateObject( comIdentity ) If Err = 0 Then TestObject = True Set xTestObj = Nothing Err.clear End Function Public Function CheckCOM() OKCount = 0 strTxt = "<table border=1 bordercolor=black cellspacing=0 cellpadding=0 align=center width=400>" For Idx = LBound( comList ) To UBound( comList ) Provider = Idx strTxt = strTxt & "<tr><td width=200>" & comList(Idx)(0) & "</td>" 'strTxt = strTxt & "" If TestObject( comList(Idx)(1) ) Then strTxt = strTxt & "<td align=center><font color=red>Instalado</font></td>" OKCount = OKCount + 1 Else strTxt = strTxt & "<td align=center>Não Instalado</td>" End If strTxt = strTxt & "</tr>" Next strTxt = strTxt & "</table><p align=center><b>" & OKCount & "</b> de " strTxt = strTxt & UBound( comList ) + 1 & " componentes estão avaliados em seu servidor.</p>" CheckCOM = strTxt End Function Response.Write( CheckCOM() )%>

já que o lance é sugurança, acho melhor criar um script próprio de criptografia do que pegar algum pronto na net, pois se ta na net todo mundo tem acesso e ai seria facil descriptografar (e palavra chata de escrever) os dados.

Se voce estiver rodando o script em um WebServer, pelo jeito ele não suporta asp. Caso seja local é como o Dark0 disse, voce tem que instalar o PWS (Win98, Me) ou o IIS (Win XP Pro).

Voce fez alguma comparação na pagina supostamente segura?? if session("login")<>true then response.redirect("senha.asp") end if

Sinceramente não conheço, servidor gratuito é "fyoda" as vezes você acha um certo componente ai no meio do projeto você precisa de outro e cade??? Eu sei que já falaram isso, mais da uma cotada com o Jissa e o Resopi, c vai ver que vale a pena.

O componente CDONTS realmente esta instalado, mais será que existe um servidor SMTP para enviar as mensages??? acho que não..

O ASP parou no 3.0. é que a versão 3 saiu a partir do Windows 2000. []'s

O limite para passar dados por querystring é de 1024 caracteres.

Duvida não pertinente a essa sessão. Movendo para outros assuntos. []'s