bareta

vixi maria... num tendi nada mais .... armazene no banco de dados.. usando instruções como insert, update depois gere o doc... da uma olhada nesse tópico http://scriptbrasil.com.br/forum/index.php?showtopic=17305

eu acho que isso não tem nada a ver com asp... então vou mover pro vbscript que lá fica mais facil pra você.. beleza..

hehehehehe.... tranquilo.... qualquer coisa posta ai...

<% x=request.querystring("x") if x=1 then n_campos=request.form("n_campos") for i=1 to n_campos sql="insert into tabela (campo1,campo2,campo3) values ('"&request.form("campo1_"&(i))&"','"&request.form("campo2_"&(i))&"','"&request.form("campo3_"&(i))&"')" conn.execute(sql) next end if %> <form name="form" method="post" action="pagina.asp?x=1"> <% z=0 for i=1 to 10 z=z+1 %> campo1_<%=(i)%>: <input type=text name=campo1_<%=(i)%> value=xxxxx> <br> campo2_<%=(i)%>: <input type=text name=campo2_<%=(i)%> value=xxxxx> <br> campo3_<%=(i)%>: <input type=text name=campo3_<%=(i)%> value=xxxxx> <br> <% next %> <inpu type=hidden name=n_campos value=<%=z%>> <input type=submit value=enviar></form> isso é um exemplinho bem tosco... hehehehehe

use js .... onclick="document.imagemnone.src='src do arquivo.ext';"

use server.mappath("pasta/arquivo.mdb")

beleza... o cdonts está sendo desativado, nem todos os hosts estão usando ele... como sabem o que se usa agora é cdosys.... no win xp ele já vem instalado....

vixi maria.... hehehehehe no script brasil tem alguma galeria???

basta adicionar o id da materia no comentario ai na hora de exibir busca comnetarios pelo id da materia

opa serve para pegar sua resposta e jjogar na minha como ai em cima... citando as suas falas...

esse if do inicio deve verificar o que???? If (request.querystring("verifica")) then se for para não passar em branco use: If (request.querystring("verifica"))<>"" then

eu faço assim os inputs tem nomes normais tipo nome1 e vai adicionando os numeros para cada tipo serão 10 campos nome né... nome1 nome2 nome3 etc.... agora para a sql fazemos um for for i=1 to 10 e o insert normal mais os campos tem que ter o numero... então fica request.form("nome"&(i)) next entenmdeu???

hehehhehehehe.... muito massa... eu tentei começar no php e abandonei... é mta frescura.... por enquanto não vo mexe muito isso.... saber o php seria bom.... na verdade otimo.... de vez em quando encaro alguns trabalhos em php... mais quebro a cabeça pra ********.

Página - 1 activeusers.asp <% Sub LogActiveUser Dim strActiveUserList Dim intUserStart, intUserEnd Dim strUser Dim strDate strActiveUserList = Application("ActiveUserList") If Instr(1, strActiveUserList, Session.SessionID) > 0 Then Application.Lock intUserStart = Instr(1, strActiveUserList, Session.SessionID) intUserEnd = Instr(intUserStart, strActiveUserList, "|") strUser = Mid(strActiveUserList, intUserStart, intUserEnd - intUserStart) strActiveUserList = Replace(strActiveUserList, strUser, Session.SessionID & ":" & Now()) Application("ActiveUserList") = strActiveUserList Application.UnLock Else Application.Lock Application("ActiveUsers") = CInt(Application("ActiveUsers")) + 1 Application("ActiveUserList") = Application("ActiveUserList") & Session.SessionID & ":" & Now() & "|" Application.UnLock End If End Sub Sub ActiveUserCleanup Dim ix Dim intUsers Dim strActiveUserList Dim aActiveUsers Dim intActiveUserCleanupTime Dim intActiveUserTimeout intActiveUserCleanupTime = 1 'In minutes, how often should the ActiveUserList be cleaned up. intActiveUserTimeout = 20 'In minutes, how long before a User is considered Inactive and is deleted from ActiveUserList If Application("ActiveUserList") = "" Then Exit Sub If DateDiff("n", Application("ActiveUsersLastCleanup"), Now()) > intActiveUserCleanupTime Then Application.Lock Application("ActiveUsersLastCleanup") = Now() Application.Unlock intUsers = 0 strActiveUserList = Application("ActiveUserList") strActiveUserList = Left(strActiveUserList, Len(strActiveUserList) - 1) aActiveUsers = Split(strActiveUserList, "|") For ix = 0 To UBound(aActiveUsers) If DateDiff("n", Mid(aActiveUsers(ix), Instr(1, aActiveUsers(ix), ":") + 1, Len(aActiveUsers(ix))), Now()) > intActiveUserTimeout Then aActiveUsers(ix) = "XXXX" Else intUsers = intUsers + 1 End If Next strActiveUserList = Join(aActiveUsers, "|") & "|" strActiveUserList = Replace(strActiveUserList, "XXXX|", "") Application.Lock Application("ActiveUserList") = strActiveUserList Application("ActiveUsers") = intUsers Application.UnLock End If End Sub %> Página - 2 ver.asp (exibe a quantidade de usuários online, pode ser colocado em qualquer outra página (não precisa ser exatamente "ver.asp") desde que feito corretamente!) <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Untitled Document</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body> <!--#INCLUDE FILE="activeusers.asp"--> <% Call LogActiveUser() Call ActiveUserCleanup() Response.Write Application("ActiveUsers") & " Online." %> </body> </html> muito massa ... mais num testei... tem um que eu fiz a uma decada.... deixa eu achar minha senha do domaindlx e vou postar aqui.... http://www5.domaindlx.com/bareta/online/on...onlineteste.asp

hehehehehehehehehehe.... substitua for i =1 to 10 por: (inicio do loop no bd) while not exe.eof e next por: exe.movenext wend entendeu???? so postei um exemplo usando um for... você deve substituir o for pelo loop do bd

to fechando o tópico

respondi no outro tópico....

use dateadd

o que você pode fazer é localizar a palavra carro... e exibir um trecho sobre ela.... use instr em conjunto com mid....

faça o seguinte <% .... %> <table> <tr> <td> <% x=1 colunas=3 for i =1 to 50 %> conteudo <% if x<colunas then response.write "</td><td>" x=x+1 else response.write "</td></tr><tr><td>" x=1 end if next %> </td></tr> </table> <% ... %>

use algum componente de upload para fazer o up... utilize fso para criar e excluir pastas e excluir arquivos utilize no bd uma tabela tipo foto | user_id eu acho melhor.... ai verifica com o fso se o usuario já tem pasta ... se num tive cria.... faz o up na pasta e depois grava o nome na tabela do bd...

uma resposta rapida essa variavel da resolução em ASP funciona sim.... mais é impossivel fazer ela imprir algo... em testes funcionou.... pelo menos no iis...

ou use em ASP http://scriptbrasil.com.br/forum/index.php?showtopic=62702

my brother... kd a ajuda???? so to vendo link pra serviços de troca de banners o que ao meu ver não tem nada a ver com desenvolvimento.... tópico fechado...

porque não atualiza o driver????? atualiza e ve se funciona