Ir para conteúdo
Fórum Script Brasil

PASP

Membros
  • Total de itens

    151
  • Registro em

  • Última visita

Tudo que PASP postou

  1. PASP

    Binário

    Cara, adiantou e não adiantou Seguinte preciso de um componente com sua respectiva rotina, para inserir uma figura no BD! Tá osso, outro dia vi o dark0 com uma duvida semelhante, resolveu? se sim, me ajuda? é que to precisando urgentasso, falou obrigado!
  2. PASP

    Tipo De Dados

    Qual tipo de dados eu uso para gravar um arquivo .jpg, .gif .bmp enfim uma imagem, no banco mysql? Binario? não? Me falem? Um ABraço
  3. PASP

    Binário

    Como eu gravo no bd uma figura.jpg ou .gif em binário? Falous
  4. PASP

    Global

    Bom, Testei aqui e deu corretamente... O que fazer? Seguinte... . Botão Direito na pasta do site... . Compartilhamento . Compartilhamento da Web . Clique em 'Compartilhar esta Pasta' . Escolha um 'Alias' para tal pasta . Acesse a página através de --> http://localhost/ALIAS_ESCOLHIDO Falou!
  5. PASP

    Global

    Cara, o código em vermelho é para (lock) bloqueia e (Unlock) desbloqueia, para que o cálculo seja feito corretamente, independente se ouver acesso simultâneo ou não. Li em alguns lugares que caso eu compartilhe minha pasta para WEB funciona, mas ainda não testei, vou testar e qualquer coisa eu posto, estou aberto a dicas/sugestões..
  6. PASP

    Global

    Consideração importante: . O arquivo Global.asa e o arquivo .asp estão em subdiretórios, não estão na raíz; Alguma dica?
  7. PASP

    Global

    Olá, a Global.asa não funciona.. O que fazer? . Desistir; . Formatar; . Contratar o Lula; Bom... Arquivo Global.asa <script LANGUAGE=vbscript RUNAT=server> Sub Application_OnStart Application.Lock Application("usuariosonline") = 0 Application("total") = 0 Application.Unlock End sub Sub Session_OnStart Application.Lock Application("usuariosonline") = application("usuariosonline") + 1 Application("total") =application("total") + 1 Application.Unlock End sub Sub Session_OnEnd Application.Lock Application("usuariosonline") = Application("usuariosonline") -1 Application.Unlock End sub </SCRIPT> Arquivo .asp <%@LANGUAGE=VBSCRIPT %> <%= "Total de Usuários: " & Application("total") & "<br>" "Usuários Online: " & Application("usuariosonline") %> Windows: 2000, IIS... Me ajudem...
  8. PASP

    Ajuda

    Cara, fiz e revisei rotina, olhei todos os tópicos, mas o erro persiste... Erro: Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A0046) Permissão negada /supermarket/envia.asp, line 13 Script: Set msg = Server.CreateObject("CDONTS.NewMail") msg.From = "meumail@mail.com.br" msg.To="meumail@mail.com.br" msg.Subject = "Email via ASP" msg.Body = "Aqui vem o corpo da mensagem. Você pode escrever o que desejar!" msg.Send Set msg = Nothing Line 13 -> msg.Send :/
  9. PASP

    Erro 800a03ee

    Cara, tem códigos que nós fazemos que podemos passar o olho mil vezes que não achamos, uma outra pessoa bate o olho já acha.. auheuhae falou
  10. PASP

    Duvidas Em Asp

    Não pderia ser um Botão de Opção não? (Radio) se marcar uma opcao INCREMENTA se marcar a outra DECREMENTA.. faz um formulário, e na página onde você for receber os dados você os cálculos para incrementar e decrementar, se puder e você tiver dúvida nós te ajudamos com a rotina, acho que fica mais fácil e mais interativo
  11. PASP

    Erro, Erro, Erro

    Ou a tabela está vazia (sem registros), ou não existe o nome do campo que você colocou.. Atenção!
  12. PASP

    Envio De E-mail

    Cara, o Windows 2000 server e o XP têem um servidor SMTP próprio, no IIS, basta você configurar o IIS e disponibilizar o servidor.
  13. PASP

    Problemas Com O Iis

    Dá uma olhada.. Sempre procurar na pesquisa do fórum
  14. PASP

    Um Dica De Como Posso Somar

    faça o select xsoma=0 if rs.eof or rs.bof then response.write "não tem registro" else rs.movefirst do while not rs.eof xsoma = xsoma + rs("NOME_DO_CAMPO") rs.movenext loop response.write "a soma dos valores do campo 'TAL' foi de " & [COLOR=red][B]xsoma[/B][/COLOR] end if Errei ali, desculpas
  15. PASP

    Um Dica De Como Posso Somar

    seguinte... faça o select xsoma=0 if rs.eof or rs.bof then response.write "não tem registro" else rs.movefirst do while not rs.eof xsoma = xsoma + rs("NOME_DO_CAMPO") rs.movenext loop response.write "a soma dos valores do campo 'TAL' foi de " & rs("NOME_DO_CAMPO") end if Espero ter ajudado
  16. PASP

    Persits Aspemail

    <% Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "smtp@provedor.com.br" Mail.From = "De" Mail.FromName = "Para (Nome)" Mail.AddAddress "Para (E-Mail)" Mail.Subject = "Assunto" Mail.Body = "texto" Mail.Send If Err <> 0 Then ' Ocorreu erro strErr = Err.Description else response.write "E-Mail enviado com sucesso" End If %> Tudo certo? Espero ter ajudado!
  17. PASP

    Um Dica De Como Posso Somar

    set rs=conexao.execute("select * from tabela where familia like '"+ CONDIÇÃO +"' order by familia") Você selecionou na 'tabela' do BD, todos os registros onde o campo familia seja a igual à CONDIÇÃO (você deve determinar).. if rs.eof or rs.bof then response.write "não tem registros" else rs.movefirst do while not rs.eof cont = cont +1 rs.movenext loop response.write "foram encontrados " & cont & " registros." end if Espero que seja isso e que tenha ajudado!
  18. PASP

    Erro 800a03ee

    objFS.DeleteFile( Server.MapPath(caminho))
  19. PASP

    Ajuda

    Olá, Fiz o seguinte, instalei o windows 2000, conseuqtentemente o servidor é o IIS, ah e estou usando agora, o CDONTS, acontece que... Set objmail = Server.CreateObject("CDONTS.NewMail") objmail.from = request.form("email") objmail.to = "meumail@uol.com.br" objmail.subject = request.form("assunto") objmail.body = request.form("msg") objmail.send set objmail = nothing Erro: Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A0046) Permissão negada /envia.asp, line 14 Line 14 --> set objmail = nothing Obs: Dll (cdonts.dll) em /windows/system32 e registrada! Aff, o que pode ser?
  20. Olá Pessoal, Eu tenho um formulário que envia os dados para a pagina envia.asp, então... <form method="POST" action="envia.asp"> <input type="text" name="nome"><br> <input type="submit" name="btenvia" value="Enviar"> </form> Com base nisso, gostaria de que essa página que recebe os dados, envia.asp, fosse aberta em uma janelinha POPUP e não em seu tamanho normal, como eu poderia fazer isso?
  21. PASP

    Ajuda

    As dúvidas acima, eu já achei aqui e deu certo, porém... Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "Meu nome" Mailer.FromAddress= "meuemail@uol.com.br" Mailer.RemoteHost = "smtp.uol.com.br" Mailer.AddRecipient request.form("nome"), request.form("email") Mailer.Subject = request.form("assunto") Mailer.BodyText = request.form("msg") if Mailer.SendMail then Response.Redirect "emailcerto.asp" else Response.Redirect "emailerro.asp" end if set Mailer = Nothing o que tem de errado aí que ele só entra no Response.Redirect "emailerro.asp"
  22. PASP

    Ajuda

    Bom, A dll dele está em C:\Windows\System e ainda registrei (RegSVR32 ...) porém eu uso o PWS, este componente funciona no PWS? E como eu verifico permissões como disse o ursolouco? Muito Obrigado, Um Abraço
  23. PASP

    Ajuda

    Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Resultado: Objeto Server error 'ASP 0177 : 800401f3' Falha em Server.CreateObject O que pode ser? Obrigado, Um Abraço!
  24. PASP

    Style Xp

    Olá, andei procurando uma OCX que tivesse o Estilo do Windows XP ou algo do gênero, e me deparei com a OSenXPsuite, porém ela é cara e não rola! Alguém teria algum outro exemplo aê! Falou, Obrigado ;]
  25. PASP

    Asp E Mysql

    bom galera, tive que fazer uma matematicazinha já que no mysql é: (aaaa-mm-dd) então vamos la? ANO = mid(date,7,4) MES = mid(date,4,2) DIA = mid(date,1,2) Formatando... data = ANO & "-" & MES & "-" & DIA Pra gravar em um BD MySQL seria com a variavel "data".. Pra exibir então uma data do BD é só fazer o contrario.. Duvidas? Espero ter ajudado Bom agradeço ai
×
×
  • Criar Novo...