spy73
-
Total de itens
20 -
Registro em
-
Última visita
Posts postados por spy73
-
-
Gente,
tem uma combobox que é carregada através de outros componentes via ajax.
Uma das opções faz com que a combo tenha quase 7 mil itens. Essa mesma combo carrega outra combobox de acordo com o valor nela selecionado.
Acontece que quando ela está com esses quase 7 mil itens e eu vou selecionar um desses itens e gera um postback, a página demora muito, mas muito mesmo pra carregar denovo.
Acho que toda vez que tem um postback a combo é preenchida novamente.
Queria saber uma maneira de evitar isso.
Alguém já passou por isso ou tem alguma idéia de como resolver?
Aguardo resposta.
Hélio
P.S.: Estou desenvolvendo o sistema em ASP.NET com VB.NET.
Opa Hélio, tranquilo?
Então cara, 7 mil registros num combo acho que fica muito pesado, o retorno do banco vai ser meio lento. Claro, a sua infra influi totalmente né, mas mesmo assim o esquema era tentar quebrar isso, ou fazer algum outro filtro para não sobrecarregar o combo.
Uma dica: Posta esse tópico lá no Fórum de .NET, que é mais específico.
AbcS,
Rodrigo.
-
O que sei é que isso certamente não será feito com asp... Aguarde que algum moderador irá mover o seu tópico para o fórum apropriado: css/html.
[]'s Rafael Spilki
Ah, eu coloquei aqui porque todo a minha codificação está em ASP... xD
-
Bom Dia, galera!
Tenho uma lista de produtos em uma tabela, mas a medida que vou descendo a página, gostaria que o cabeçalho se mantesse para o usuário acompanhar a que se refere a coluna. Como eu consigo fazer isso?
Aproveitando, tenho uma segunda dúvida: Tenho alguns botões na página que são apenas imagens, por isso quero fazer com que quando o usuário colocar o ponteiro do mouse em cima do botão, um ToolTip apareça para mostrar para que o botão serve.
Eu já pesquisei na net sobre isso e vi que a propriedade ALT que faz isso. Coloquei nos botões mas mesmo assim o ToolTip não aparece... Alguém sabe o motivo/como resolver tal questão?
Ex.: <img src='imagem/imagem.jpg' border='0' width='20' height='20' alt='Imagem'>
Valeu aew, AbcS.
--
Rodrigo.
-
sim... certamente deve ser por conta do separador! tem que ser um e-mail (endereço de e-mail padrão) por vez!
Para tirar o ";" use split!
[]'s Rafael Spilki
Tentei usar o split mas não deu certo... O que fiz de errado?!
Código:
eDest = split(v_para,";")
for i=0 to UBound(eDest)
Mail.AddAddress eDest(i)
next
Response.Write eDest
Sendo q o v_para tem o valor dos e-mails: "teste@teste.com.br; test1@teste.com.br; etc..."
Ufa, consegui... xD
Valeu pelo help aew, Rafael...!
AbcS,
Rodrigo.
-
sim... certamente deve ser por conta do separador! tem que ser um e-mail (endereço de e-mail padrão) por vez!
Para tirar o ";" use split!
[]'s Rafael Spilki
Tentei usar o split mas não deu certo... O que fiz de errado?!
Código:
eDest = split(v_para,";")
for i=0 to UBound(eDest)
Mail.AddAddress eDest(i)
next
Response.Write eDest
Sendo q o v_para tem o valor dos e-mails: "teste@teste.com.br; test1@teste.com.br; etc..."
-
é que tem que colocar um e-mail de cada vez:
Mail.AddAddress Destino1 Mail.AddAddress Destino2 Mail.AddAddress Destino3
saca só a fonte:
http://forum.wmonline.com.br/lofiversion/i...hp/t121726.html
[]'s Rafael Spilki
Então, eu fiz assim pra tentar resolver, verificando as dicas do link que você mandou:
while not aprova.eof
v_para = v_para + aprova( "email" )
Mail.AddAddress v_para
aprova.movenext
if not aprova.eof then
v_para = v_para + "; "
end if
wend
Assim, TEORICAMENTE, ele iria add um e-mail a cada vez e não teria problemas, certo?!
Mas o erro persiste... Será q é porque to colocando esse separador aew: v_para = v_para + "; " ?!?!?!
Caraca, eu já não gostava de ASP puro antes de mexer, agora q to mexendo to vendo q é mais chato do q eu pensava... hahaha
-
Bom Dia galera, tranquilo?!
Eu tenho um código aqui que manda um informativo por e-mail para alguns contatos mas dá erro quando a variável V_PARA tem mais de um e-mail...
Código:
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "localhost"
Mail.From = v_email_remetente
Mail.FromName = v_nome_remetente
Mail.AddAddress "mr.spy7@gmail.com; rodrigo@diretriz.srv.br"
' v_para
Mail.Subject = v_assunto
Mail.Body = v_corpo
Mail.IsHTML = True
On Error Resume Next
Mail.Send
Set Mail = Nothing
Call FechaBanco
Response.Write v_para
If err = 0 Then
response.Redirect( "solicitacao.asp" )
Else
Response.Write( "<tr><td class='fonte-grid-erro' colspan='2' class='fonte-grid-erro'><div align='center'><font color='#FF0000'>Erro: E-mail(s) de destinatário(s) inválido(s)! </font></div></td></tr>")
Response.Write "Ocorreu um erro inesperado (" & Err.number & " - " & err.Description & ")"
End If
Os e-mails na variável ficam assim: "rodrigo@teste.com.br; rodrigo@teste1.com.br" etc etc etc.. E todos os e-mails saum válidos...!
Alguém tem alguma pista do porque disso ocorrer?!
Valeu, AbcS!
Rodrigo.
-
use:
"parent.location.href='default.asp';"
Caraaaaaaaaaaaaca, valeu Bareta, funfou certinho...! xD
Ficar arrumando bug de sistemas dos outros já é um porre, ainda mais quando não manjo quase nada da linguagem... =/
AbcS,
Rodrigo.
-
use javascript para redirecionar...
response.write "<script>location.href='pagina.asp';</script>"
Opa, assim sim, consegui com isso mesmo...
E como eu fecho antes os 3 frames que estão abertos?!
porque assim, quando eu clico em logout, ele vai pra página default.asp, mas depois quando eu logo novamente, ele abre os frames de novo, dentro dos que já estavam abertos... Fica, tipo, um site dentro do outro... hahaha
A minha idéia era fechar todos os frames pra deixar o site limpo, como a primeira vez que você entra...
-
Bom Dia Galera, firmeza?!
Sou novo aqui no Fórum e também programando em ASP puro. Tenho um sistema aqui que a página principal tem 3 frames e no meio a página main.asp.
Um dos links do menu é uma página logout.asp, que quando o usuário clica, preciso que o sistema feche.
Alguém sabe como fazer isso?!
AbcS,
Rodrigo.
O código da página de Logout está assim:
<%
Session.Abandon()
Session.Contents.RemoveAll()
Response.Redirect( "www.diretriz.srv.br" )
%>
Só que ele mostra que a página não pode ser exibida quando ele tenta redirecionar... Será que acontece isso pela página main.asp estar dentro de frames?!
-
Bom Dia Galera, firmeza?!
Sou novo aqui no Fórum e também programando em ASP puro. Tenho um sistema aqui que a página principal tem 3 frames e no meio a página main.asp.
Um dos links do menu é uma página logout.asp, que quando o usuário clica, preciso que o sistema feche.
Alguém sabe como fazer isso?!
AbcS,
Rodrigo.
-
é então, mas talvez seja na conexao, ou na hora de mandar os arquivos.
q programa ftp você usa?? tenta usar algum otro. ou tenta mandar o arquivo pelo painel de controle do locaweb, caso eles tenham essa opcao.
ai se continuar o erro, o jeito é entra em contato com eles mesmo.
Eu uso direto o Painel de Controle deles... To há 15 min tentando falar com eles no tel mas tá complicado, mta fila... hahaha
Vou tentar usar o FTP direto, as vezes rola melhor...
Valeu pelas ajudas aew cara, e me desculpe-me o incômodo aew... xD
AbcS,
Rodrigo.
é então, mas talvez seja na conexao, ou na hora de mandar os arquivos.q programa ftp você usa?? tenta usar algum otro. ou tenta mandar o arquivo pelo painel de controle do locaweb, caso eles tenham essa opcao.
ai se continuar o erro, o jeito é entra em contato com eles mesmo.
Eu uso direto o Painel de Controle deles... To há 15 min tentando falar com eles no tel mas tá complicado, mta fila... hahaha
Vou tentar usar o FTP direto, as vezes rola melhor...
Valeu pelas ajudas aew cara, e me desculpe-me o incômodo aew... xD
AbcS,
Rodrigo.
Ops, "ME DESCULPE-ME" foi difícil, hein... hahahhaahha
Vlw!
-
hum, eu testei aqui e esse erro acontece quando o include é encontrado, mas a funcao não é encontrada dentro dele.
os arquivos tão no servidor ne?? tenta baxar de volta o biblioteca.asp e confira se o codigo esta todo la.
as vezes é problema na hora da transferencia, seila, talvez o arquivo acabe chegando pela metade.
senao tente fazer um teste pondo o biblioteca.asp no mesmo diretorio do default_sql.asp (e mudando a linha q faz o include ne), pra ver se não é problema de permissao.
esse codigo roda localmente??
Tentei colocar tudo na mesma pasta mas o erro persiste.
Esses arquivos estão na Locaweb, foram desenvolvidos localmente e depois jogados para o servidor deles, e sempre rodou normal por lá. O banco tb se encontra lá.
Antes ele ficava no login do desenvolvedor que fez o sistema, depois migramos para o login de nossa empresa na Locaweb, e quando apontei a conexão para o banco do nosso login, que eu repliquei idêntico ao do desenvolvedor, ele começou a aparecer tal erro.
Um detalhe, não sei se é normal: Quando eu subo o arquivo "default_sql.asp" para a Locaweb e depois baixo, ele me volta sem a primeira linha de referência: <!-- #include file="biblioteca.asp"-->, e no biblioteca.asp não retorna a primeira linha tb, o "<%"... Será que isso tem alguma influência ou é normal?!
Código do default_sql.asp quando baixo da Locaweb:
<%
dim intCodCliente
session( "cd_usuario" ) = -1
Call AbreBanco
Set resultado = conn.execute( "select cd_cliente, cd_usuario, nome, aprova, separa, entrega from usuario where login = '" + Request.Form( "login" ) + "' and senha = '" + Request.Form( "senha" ) + "'" )
ETC...
Código do biblioteca.asp quando baixo da Locaweb:
Session.LCID = 1046
Session.Timeout = 1400
Dim conn
Function IsLogado
IsLogado = False
if ( Session ( "cd_usuario" ) = 0 ) or ( Session ( "cd_usuario" ) = "" ) then
Response.Redirect( "default.asp?ai=1" )
end if
IsLogado = True
end function
ETC...
A Locaweb tá comendo a primeira linha do meu código nos arquivos... -.-
Eu pensei no começo que isso fosse meio que normal, sei lá, eles criavam algum script que dispensava tais linhas e funcionava do mesmo jeito... Mas agora, quando você comentou de alterações no fonte, me dei conta de que os arquivos não estavam assim quando os peguei pela primeira vez no login do outro cara, estavam completos...
Patz, vou ligar na Locaweb e ver o que rola de fazer pra que eles não alterem meu código... =/
Será que é só isso mesmo?!
-
hum, eu testei aqui e esse erro acontece quando o include é encontrado, mas a funcao não é encontrada dentro dele.
os arquivos tão no servidor ne?? tenta baxar de volta o biblioteca.asp e confira se o codigo esta todo la.
as vezes é problema na hora da transferencia, seila, talvez o arquivo acabe chegando pela metade.
senao tente fazer um teste pondo o biblioteca.asp no mesmo diretorio do default_sql.asp (e mudando a linha q faz o include ne), pra ver se não é problema de permissao.
esse codigo roda localmente??
Tentei colocar tudo na mesma pasta mas o erro persiste.
Esses arquivos estão na Locaweb, foram desenvolvidos localmente e depois jogados para o servidor deles, e sempre rodou normal por lá. O banco tb se encontra lá.
Antes ele ficava no login do desenvolvedor que fez o sistema, depois migramos para o login de nossa empresa na Locaweb, e quando apontei a conexão para o banco do nosso login, que eu repliquei idêntico ao do desenvolvedor, ele começou a aparecer tal erro.
Um detalhe, não sei se é normal: Quando eu subo o arquivo "default_sql.asp" para a Locaweb e depois baixo, ele me volta sem a primeira linha de referência: <!-- #include file="biblioteca.asp"-->, e no biblioteca.asp não retorna a primeira linha tb, o "<%"... Será que isso tem alguma influência ou é normal?!
Código do default_sql.asp quando baixo da Locaweb:
<%
dim intCodCliente
session( "cd_usuario" ) = -1
Call AbreBanco
Set resultado = conn.execute( "select cd_cliente, cd_usuario, nome, aprova, separa, entrega from usuario where login = '" + Request.Form( "login" ) + "' and senha = '" + Request.Form( "senha" ) + "'" )
ETC...
Código do biblioteca.asp quando baixo da Locaweb:
Session.LCID = 1046
Session.Timeout = 1400
Dim conn
Function IsLogado
IsLogado = False
if ( Session ( "cd_usuario" ) = 0 ) or ( Session ( "cd_usuario" ) = "" ) then
Response.Redirect( "default.asp?ai=1" )
end if
IsLogado = True
end function
ETC...
-
tenta fazer uma funcao qualquer no biblioteca.asp tipo assim:
Sub xxx() Response.Write("xxx") End Sub
e tenta chama-la assim no default_sql.asp:xxx() Response.End()
ponha isso logo na primera linha depois do <%
o Response.End() vai impedir q o resto do codigo seja executado pra não acontecer o erro do AbreBanco()
e ai veja se vai aparecer escrito "xxx" ou se vai dar erro.
se aparecer "xxx" a gente sabe q o problema é no AbreBanco(). se der erro, a gente sabe q é no biblioteca.asp.
Fiz isso que você disse, e me retornou isso na tela:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'xxx'
/sodexo/default_sql.asp, line 3
Sei lá, o default_sql.asp não tá conseguindo enxergar o biblioteca.asp eu acho... Essa referência tá zuada... =/
-
Será que o default_sql.asp não tá conseguindo chamar tal funcão do arquivo biblioteca.asp?! Se não está, qual seria o motivo?!
é, mas é essa mensagem de erro q ta estranha.
É, to testando isso e realmente é alguma coisa na função AbreBanco() do biblioteca.asp... Testei a conexão em outros locais e ela está funcionando!mas explica melhor esses testes q você fez. o q quer dizer com "Testei a conexão em outros locais"?? quer dizer em outro arquivo?? otro banco?? otro servidor??
O erro provavelmente é que os outros arquivos não conseguem achar a função no biblioteca.asp, sei lá, a referência não tá funcionando, num sei o que é...
Ah, eu criei uma conexão ODBC no Windows, do MySQL, e testei a conexão com o banco de dados direto e funcionou, ou seja, a string de conexão tá de boa, o problema é a chamada da função, algo do tipo... =/
A referência no arquivo default_sql.asp tá certa?!
Referência: <!-- #include file="includes/biblioteca.asp"-->
Isso já é suficiente para que os arquivos usem as funções do biblioteca.asp ou falta alguma coisa?!
-
tenta comentar todo o codigo q ta dentro da sub AbreBanco e ai você testa de novo e ai não deve dar erro nela.
ai você descomenta uma linha por vez e vai testando a cada linha pra descobrir qual ta dando problema.
É, to testando isso e realmente é alguma coisa na função AbreBanco() do biblioteca.asp... Testei a conexão em outros locais e ela está funcionando!
Será que o default_sql.asp não tá conseguindo chamar tal funcão do arquivo biblioteca.asp?! Se não está, qual seria o motivo?!
O que mais me irrita é que foi de uma hora pra outra, sem mais nem menos... =/
-
não sei se no seu codigo ta assim, ou se foi na hora de posta aqui, mas tem um enter no meio do seu codigo. aqui:
conn.Open("DRIVER={MySQL ODBC 3.51 Driver};SERVER=mysql03.diretriz.srv.br;PORT=3306;DATABASE=diretriz4;USER=diretri z4;PASSWORD=sdx3737DLS;OPTION=3;")
acho q era pra ser tudo junto não??conn.Open("DRIVER={MySQL ODBC 3.51 Driver};SERVER=mysql03.diretriz.srv.br;PORT=3306;DATABASE=diretriz4; USER=diretriz4; PASSWORD=sdx3737DLS;OPTION=3;")
Foi na hora que postei aqui mesmo, meu código tá sem o Enter... =/
Eu já tentei colocar o Response.Write de algumas variáveis pra ver o valor mas eles nem aparecem na tela do site quando entram na página... Ele deveria funcionar, não?!
Ex.: Response.Write session( "cd_usuario" )
Caraca, não sei mais o que fazer pra que funcione...
Será que ele não está conseguindo abrir o banco ou nem tá chamando a página biblioteca.asp em que está a função AbreBanco()...?! Não sabia que ASP puro seria tão chato assim, uma vez que programo em .NET há 4 anos e sempre resolvo os problemas muito rápido, debbugando tranquilo... :( :( :(
-
Bom Dia, galera!
Sou novo aqui no Fórum e também programando em ASP puro, e logo de cara me deparei com tal problema:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'AbreBanco'
/sodexo/default_sql.asp, line 5
Assim que eu coloco meu login e senha no sistema ele já me retorna tal erro. A página biblioteca.asp contém as propriedades de conexão com o banco MySQL e depois chama a página default_sql.asp.
Alguém saberia como solucionar tal caso?! Vlw...!
CÓDIGO DO BIBLIOTECA.ASP:
<%
Session.LCID = 1046
Session.Timeout = 1400
Dim conn
Function IsLogado
IsLogado = False
if ( Session ( "cd_usuario" ) = 0 ) or ( Session ( "cd_usuario" ) = "" ) then
Response.Redirect( "default.asp?ai=1" )
end if
IsLogado = True
end function
Function AbreBanco()
if IsLogado then
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open("DRIVER={MySQL ODBC 3.51 Driver};SERVER=mysql03.diretriz.srv.br;PORT=3306;DATABASE=diretriz4;USER=diretri
z4;PASSWORD=sdx3737DLS;OPTION=3;")
' conn.Open("DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=diretrizportfolio;USER=admin;PASSWOR
D=;OPTION=3;")
end if
End Function
Function FechaBanco()
conn.Close
Set conn = Nothing
End Function
%>
CÓDIGO DO DEFAULT_SQL.ASP:
<!-- #include file="includes/biblioteca.asp"-->
<%
dim intCodCliente
session( "cd_usuario" ) = -1
Call AbreBanco
Set resultado = conn.execute( "select cd_cliente, cd_usuario, nome, aprova, separa, entrega from usuario where login = '" + Request.Form( "login" ) + "' and senha = '" + Request.Form( "senha" ) + "'" )
if not resultado.eof then
session( "cd_usuario" ) = resultado( "cd_usuario" )
session( "aprova" ) = resultado( "aprova" )
session( "separa" ) = resultado( "separa" )
session( "entrega" ) = resultado( "entrega" )
session( "nome" ) = resultado( "nome" )
intCodCliente = resultado ("cd_cliente")
Set resultado = conn.execute( "select cd_cliente, nm_cliente, cd_cliente_pai, logotipo, arquivo, diasenha from cliente where cd_cliente = " + CSTR ( intCodCliente ) )
if not resultado.eof then
Session( "cd_cliente" ) = resultado( "cd_cliente" )
Session( "nm_cliente" ) = resultado( "nm_cliente" )
Session( "cd_cliente_pai" ) = resultado( "cd_cliente_pai" )
Session( "logotipo" ) = resultado( "logotipo" )
Session( "arquivo" ) = resultado( "arquivo" )
Session( "diasenha" ) = resultado( "diasenha" )
end if
Response.Redirect( "main.asp" )
else
Session( "cd_cliente" ) = 0
Session( "nm_cliente" ) = ""
Session( "cd_cliente_pai" ) = 0
Session( "logotipo" ) = ""
Session( "arquivo" ) = ""
Session( "height" ) = 0
Session( "width" ) = 0
Session( "diasenha" ) = 0
Response.Redirect( "default.asp?acesso=1" )
end if
Call FechaBanco
%>
É bem na linha em que chama a função de AbreBanco do default_sql.asp, que está aberta no biblioteca.asp. Sempre funcionou, mas tive que criar outro banco de dados MySQL na Locaweb, montei a mesma estrutura de dados, tabelas e do nada começou a dar esse erro... =/
Como deixar o cabeçalho de uma tabela FIXO, ao se rolar a página?
em HTML, XHTML, CSS
Postado
Aewwwwww, funfou... Valeu pela dica, cara!
Sobre o cabeçalho fixo, alguém tem alguma idéia de como posso fazer...?!
Vlw,
Rodrigo.