Principe
-
Total de itens
466 -
Registro em
-
Última visita
Tudo que Principe postou
-
Já pesquisou algo sobre o objeto "Microsoft.xmlDOm" ? Você pode criar um xml com ele e muiiiitas outras coisas
-
O meu exemplo ai emcima não funcionou ? If not IsNumeric(Request.Form("campo_do_form")) Then Response.write("Atenção, o campo campo_do_form deve ser somente de 0-9") Else 'tudo certo .... Mas se você quiser pode fazer com JS,... Somente de a-z <input type="text" name="nome" value="" onKeyDown="javascript:if (event.keyCode < 65 || event.keyCode > 90"){return false}> Somente de 0-9 <input type="text" name="idade" value="" onKeyDown="javascript:if (event.keyCode < 91 && event.keyCode > 64){return false;}">
-
ADODB.Recordset (0x800A0CC1) Item cannot be found in the collection corresponding to the requested name or ordinal. /diretorio/index.asp, line 150 Traduzindo.... O item não pode ser encontrado na coleção correspondente ao nome ou ao ordinal solicitado. O q é isso ?? "SELECT 'Senha01 *' from Cliente01 where Login01='"&request("c1")&"'or Email01='"&request("c2")&"'and CPF01='"&request("c3")&"'") não se usa aspa simples pra chamar um campo,. ainda mais com "*" na frente.... tira essas aspas dali
-
If not IsNumeric(Request.Form("campo_do_form")) Then Response.write("Atenção, o campo campo_do_form deve ser somente de 0-9") Else 'tudo certo ....
-
Quando mostrar na tela, usa 'FormatNumber(rs("valor"))' Pra formato moeda é o melhor
-
Pelo que estou vendo você não está conseguindo né ? já em 2 post's seu ai: Faz assim dentro do loop: Dim EmailsEnviados EmailsEnviados = "" do while not rs.eof If InStr(1,EmailsEnviados,rs("campo_email")) < 1 Then 'Executa aqui o que você quiser, envia email ou sei la´ End if EmailsEnviados = EmailsEnviados & rs("campo_email") & "," rs.MoveNext Loop
-
bareta,.. já tinha tentado assim como você falou mas num deu ,.. dexa quieto...
-
Left(variavel_string,Len(variavel_string) - 4)
-
Observação: eu disse que você pode FECHAR e não DESTRUIR o objeto, Tira essa linha em vermelho: com.open set sql = com.execute(com) mostra = sql.getrows sql.close set sql = nothing com.close set com = nothing ============= até ai beleza com.open set sql = com.execute(com) ... .. capisco ?
-
border na TR o css não funca só na TD pra mudar a borda por css põe: border="0" style='border:1px solid #CC0000' ou <style type="text/css"> .bordas{ border:1px solid #CC0000 } border="0" class="bordas" </style>
-
muda só essa linha em azul na página "upload2.asp": Set Fields = GetUpload() FilePath = Server.MapPath(".") & "\poe_aqui_o_nome_que_vc_quiser.jpg" Fields("File1").Value.SaveAs FilePath
-
não,. segredo nenhum,.. é como mostrei acima,.. mostra um trecho de como você ta fazendo pra gente ver onde pode ser o seu erro
-
Faz assim ó: <!--#include file="conexao.asp" --> <%While not rsprincipal.eof%> <a href ="http://localhost/jornalviamao/teste2.asp?IDMenu=<%=RsPrincipal("IDMenu")%>">Link </a> <%rsprincipal.MoveNext Wend %> <html> <head> </head> <body> <%rsprincipal.Close If Request.QueryString("IDMenu") <> "" Then rsprincipal.Source = "select * from nome_da_sua_tabela where IDMenu = "&Request.QueryString("IDMenu") rsprincipal.Open Response.Write(RsPrincipal("Materia_Principal")) End if%> </body> </html>
-
é já consegui uma solução... fiz assim: ao invés de chamar a função assim 'funcao()' agora eu chamo assim 'funcao("")' ai dentro da function eu coloquei um "if"... o ASP só dá erro se você não passa nehum valor: 'NULL' , mas ' "" ' ele aceita Que coisa não !?! se quiserem, pode fechar o Top.
-
olha só, presta atenção: "while not rsprincipal.eof" - traduzindo para o portugol: "enquanto não for o fim do arquivo..." "rsprincipal.MoveNext" - trad. "...mova o cursor pra o próximo registro..." "wend" - trad. "..repita." Entendeu? ele vai executar esta ação ate chegar ao FIM do arquivo você estando no fim do arquivo você não tem mais dados, portanto não pode usá-los, prq não existem mais dados.. Veja como é um banco de dados com 3 registros: ___________________ - início do arquivo -> BOF -> Begin Of File - 1º Registro -> Fisrt - 2º Registro -> second - 3º Registro -> Third - fim do arquivo -> EOF -> End Of File ___________________ Resumindo... depois que você já mostrou todos os registros até o fim do arquivo ou você move o cursor pra algum ponto com registro (usando Move) ou você fecha e reabre a conexão Seu erro: <body> <%=RsPrincipal("Materia_Principal")%> </body> Coloque essa linha logo abaixo do "Wend" (uma solução medíocre): rsprincipal.MoveFirst Bom,.. depois desse curso ai você já pode fazer todos seus sistemas no braço hehhehe
-
Ou dispara o action do form contra a própria página? ai você faz um redirect só se o login e a senha estiverem corretos.
-
você precisa mudar o exemplo da Ceh e adaptar ao seu programa. <%While not rs.eof%> <a href ="http://localhost/teste/produto?IDProduto=<%=rs("IDProduto")%>">Link </a> <%rs.MoveNext Wend %> Aposto que o nome do seu RS é outro,. verifica isso..
-
Cria seu próprio edito Usa <div contenteditable style='width:200;height:200;border:1px solid #000000'></div> Aí é só detonar no JS..
-
não entendi muito bem, mas.... Você pode sem problemas "reaproveitar" um RS,. eu uso muito quando preciso só de um dado e depois abaixo mais alguns,. naquele que precisei extrair só UM dado eu faço o RS e armazeno o resultado numa variável, fecho a conexão e reutilizo ela pra fazer novas requisições. Tipo assim: set rs = Server.Crea... rs.ActiveConnection = .. rs.CursorT... rs.CursorL... rs.Lock... rs.Source = "select id_produto from produtos where area = 1" rs.Open id_pro = rs(0) rs.Close rs.Source = "select vendedor from vendas where produto = "&id_pro rs.Open ....
-
Acho que já sei qual é o seu problema coloca isso aqui no começo da sua página:
-
Ou o nome de alguma campo ta errado ou a VarID está vazia !!