ADL

Criando uma janela em java usando o pacote SWING Com poucas palavras estou colocando um código de como criar uma janela simples em java. Depois postarei como inserir textos e botões. Espero ter ajudado com este código. import javax.swing.*; public class Jan_1 extends JFrame { public Jan_1() // construtor possui o mesmo nome da classe { /*É aqui que definimos como será a janela * Os atributos e layout * Vamos lá * */ setTitle("Minha primeira janela em java"); // nome da janela setSize(360,140); // tamanho da janela setLocation(350,300); // onde a janela ira aparecer, em outras palavras as coordemadas } public static void main(String args[]) { Jan_1 obj = new Jan_1(); // cria o objeto que ira controlar a nossa janela obj.setVisible(true); // aqui o objeto faz a janela ficar visivel obj.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);// aqui o objeto é ecarregado de fechar a janela. } } Colocando alguns compomentes na janela: Botão, Texto e caixa para digitar palavras. Bom nesse exemplo o código acima eu dei uma incrementada adiciomando botão etc. é bem simples, mas para efeitos didaticos server.. import javax.swing.*; import java.awt.*; public class Jan_1 extends JFrame { JButton button; //declaração do objeto botão JLabel label; // declaração do objeto de texto. Texto so pode ser inserido através das label JTextField f1; // delcaração do objeto onde é inserido o texto public Jan_1() // construtor possui o mesmo nome da classe { /*É aqui que definimos como será a janela * Os atributos e layout * Vamos lá * */ setTitle("Minha primeira janela em java"); // nome da janela setSize(360,140); // tananho da janela setLocation(350,300); // largura ou dimensão da janela button = new JButton("OK"); // criando o objeto com o texto OK label = new JLabel("Nome");// criando o objeto com o texto nome f1 = new JTextField(10);// criando o objeto onde é inserido o texto, esse numero dentro do construtor diz o tamanho da caixa getContentPane().setLayout(new FlowLayout()); // definindo o tipo de layout da janela, existe outros layout. getContentPane().add(label); // adicionando os objetos na janela através do metodo getContentPane() getContentPane().add(f1); // adicionando os objetos na janela através do metodo getContentPane() getContentPane().add(button); // adicionando os objetos na janela através do metodo getContentPane() } public static void main(String args[]) { Jan_1 obj = new Jan_1(); // cria o objeto que ira controlar a nossa janela obj.setVisible(true); // aqui o objeto faz a janela ficar visivel obj.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);// aqui o objeto é ecarregado de fechar. } }

Obrigado pela força vou ver o que posso fazer , mas obrigado pelas dicas...

Ele diss que o Internet Explore não pode baixar e logo abaixo Erro não especificado. já fiz de tudo não sei mais o que fazer.

Eu fiz o que você disse e quando chega o email, e clico parra abrir a página abre a janela de localizar janelas e links e quando eu encosto no cursor do mouse sobre o link aparece um monte de numeros. O que pode ser. segue o código modificado. objCDOSYSMail.HtmlBody = "Prezado(a): <br>Segue abaixo o link contendo o formulário de encerramento de caso para vossa apreciação e conclusão do procedimento.<br><br>Att.<br><br><A href=java script:openwindow('http://localhost/login1.asp','Acesso','height=250,widtd=500');>Acesso</a>"

Monta um cadastro com as informações, no cas um formulario com os campos que você precisa, ai depois façamos a inclusão, exclusão, atualização. referente a permissão você pode deixar por ultimo, e qualquer dúvida posta ai . há não podia me esquecer você vai precisar de um banco de dados também. beleza

deu certo mais não abre diz que o internet explore não ´pode baixar é um link . olha como ficou.

Olá pessoal estou tentado inserir tags html e não sei como fazer alguém pode me ajudar por favor? segue o código do email. <a href="java script:abrejanela('login1.asp','500','250');">Abir</a> Desde já agradeço não estou conseguindo inserir o código asp. vou tentar de novo sub enviaEmail(cod_cli,email_coor) msgTexto = "Encerra Caso(s)." + vb script:abrejanela('login1.asp','500','250');>Abir</a> Att." objCDOSYSMail.Send Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing end sub

beleza resolvi eu tinha uma função que estava comentada e a chamada dessa função não. se funcionasse eu ia estranhar sou novato em javascript, mas muito obrigado pela força.

Apareceu erro na linha 196 objeto esperado não faço ideia.

sim já fiz isso mas não chama. <script language="javascript" type="text/javascript" src="arquivos_js/ajax.js"> </script> <script language="JavaScript" type="text/javascript" src="arquivos_js/focus_campos.js"> </script> Essa é a função que está dentro do arquivo focus_campos.js function reupera_Valor() { var dia = document.getElementById("dia").value; var mes = document.getElementById("mes").value; var ano = document.getElementById("ano").value; var solicitado = document.getElementById("solicitado").value; var cod_cliente = document.getElementById("cod_cliente").value; var caso = document.getElementById("caso").value; var faturamento = document.getElementById("faturamento").value; var participacao = document.getElementById("participacao").value; var hora = document.getElementById("hora").value; var partido = document.getElementById("partido").value; var misto = document.getElementById("misto").value; var final = document.getElementById("final").value; var valor = document.getElementById("valor").value; var parcela = document.getElementById("parcela").value; var ocorrencia = document.getElementById("ocorrencia").value; var fatura = document.getElementById("fatura").value; var exito = document.getElementById("exito").value; var observacao = document.getElementById("observacao").value; var encerramento = document.getElementById("encerramento").value; var observacao1 = document.getElementById("observacoes1").value; var cliente = document.getElementById("cliente").value; var obrigatorio = document.getElementById("obrigatorio").value; var url = "insereEncerramento.asp?dia="+dia+"&mes="+mes+"&ano="+ano+"&solicitado="+solicitado+"&cod_cliente="+cod_cliente+"&caso="+caso+"&faturamento="+faturamento+"&participacao="+participacao+"&tabela="+tabela+"&observacao="+observacao+"&encerramento="+encerramento+"&observacao1="+observacao1+"&cobranca="+cobranca+"&mensal="+mensal+"&pasta="+pasta+"&hora="+hora+"&partido="+partido+" &mensal="+mensal+"&pasta="+pasta+"&hora="+hora+"&partido="+partido+"&misto="+misto+"&final="+final+"&valor="+valor+"&parcela="+parcela+"&ocorrencia="+ocorrencia+"&fatura="+fatura+"&exito="+exito+"&cliente="+cliente+"&obrigatorio="+obrigatorio+""; } O arquivo ajax.js precisa dessa url como eu passo ela já dei return url mas deu erro que aparecde na barra de status. Agradeço a sua ajuda.

Olá eu tenho duas funções js, aminha dúvida é da para chamar uma função que está em outro arquivo js? se sim como faze-lo desde já eu agradeço.

Isso mesmo muito obrigado valeu.

Olá pessoal eu tenho um formulário, e parte desse formulário aparece quando o usuário clica no botão, ate ai beleza. Minha dúvida é: tem como pegar o valor desse campo em javascript. E outra dúvida é tem como quando o usuário clicar no botão executar dois eventos onclick. Desde já agradeço a atenção. Esse é o código onde o usuario clica e aparece alguns campo na tela do formulário. <input name="cobranca" type="checkbox"value="Por Hora" id="hora" onClick="Teste3('cobranca');">Por Hora<br> E essa é a função que coloca os campo no formulário function Mostra(local) { if(document.getElementById("hora").checked == true) { var pula; pula = "<br><fieldset><legend>Tabela</legend><br><input name=tabela type=radio value=Padr&atilde;o id=padrão radio_b();>Padrão <br> <input name=tabela type=radio value=20% Desconto id=desconto>20% Desconto <br> <input name=tabela type=radio value=Outros id=outro>Outros <br> <textarea name=obrigatorio cols=33 rows=4></textarea></fieldset>"; document.getElementById(local).innerHTML = pula; } if(document.getElementById("hora").checked == false) { pula=""; document.getElementById(local).innerHTML = pula; } } Outra duvida é se tem como colocar evento nesse código, pois são alguns botões de rádio e gostaria que quando fosse clicado nesse botão verificasse e outro campo foi preenchido. Conseguir fazer obrigado pela ajuda. Agora só tenho uma dúvida. Como eu faço para colocar dopis eventos no mesmo botão onclick. não sei fazer. exemplo <input name="cobranca" type="checkbox"value="Por Hora" id="hora" onClick="Mostra('homenagens')" onClick="Valida()">Por Hora<br> Eu fiz assim não funciona

então eu fiz assim porque quero que quando o usuário digitar a url do site abra num popup, por isso eu fiz assim, tem outro jeito? beleza entendi o que você disse, e fiz pelo link, agora ta beleza. Eu tenho outra dúvida minha página está abrindo com a barra onde aparece o botão fechar minimizar, como eu faço para tirar. Estou usando essa função aqui: Aqui o link <a href="java script:abrejanela('login1.asp','500','250');">Abir</a> E aqui a funão que abre a janela function abrejanela(url,l,a) { var x = parseInt((screen.width-l)/2); var y = parseInt((screen.height-a)/2); var win = window.open(url,'','width='+l+',height='+a); win.moveTo(x,y); } Então onde eu coloco ou devo mexer para sumir o menubar, desde já eu agradeço.

Olá pessoal eu tenho uma página que quando é digitado a url ,ela abre um popup. No instante que ela abre o popup, coloquei um script para fechar. Mas pede confirmação tem um geito de não pedir confirmação, simplesmente fehcar a janela. Desde já eu agradeço, eu pesquisei mas não achei o que eu queria.

Oi amigo bom dia! Você vai ter que fazer mais ou menos assim. select nome dos campos que você quer que apareca from nome do banco where nome do campo de comparação e a variavel ou seja. sql = select nome from tabela where id ='"&variavel&"" set rs = conexao.execute(sql) Eu não entendi muito bem o campo testo, mas se for input type. faz assim <input type=text name=nome value=<%=rs("nome")%>> Espero ter ajudado.

Tenta assim "Driver={Microsoft ODBC for Oracle};Server=nome do banco;Uid=usuario do banco;Pwd=senha do banco;"

Eu uso esse aqui , faz um teste, o único problema que não consegui arrumar o acento. <% Response.Charset="ISO-8859-1" %> <% ' ' Função de busca de Endereço pelo CEP ' - Desenvolvido Felipe Olivaes para ajaxbox.com.br ' - Adaptação de exemplo para utilização com ASP por Otávio Nogueira ' - Utilizando WebService de CEP da republicavirtual.com.br ' if not session("acesso") = "SIM" then 'Redirecionamos para a Página de Login e informamos o erro response.redirect("restrito.asp?erro=negado") else function busca_cep(cep) cep = trim(request.form("cep")) ' var url ="recebeAjax.asp?usuario="+escape(usuario)+"&senha="+escape(senha); url = "http://republicavirtual.com.br/web_cep.php?cep="+escape(CEP)+"&formato=query_string" set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") xmlhttp.open "GET", url, false xmlhttp.send "" xmlhttp_resultado = xmlhttp.responseText set xmlhttp = nothing arr_resultado = split( xmlhttp_resultado, "&" ) dim resultado(7) for i = lbound( arr_resultado ) to ubound( arr_resultado ) resultado( i ) = arr_resultado( i ) next arr = split( join( resultado, "=" ), "=" ) dim arr_2(14) for i = lbound( arr ) to ubound( arr ) arr_2( i ) = replace( arr( i ), "+", " " ) next busca_cep = arr_2 end function ' ' Exemplo de utilização ' if request.form("valor")<>"" then cep = trim(request.form("cep")) resultado = busca_cep(cep) select case resultado(2) case "2" cidade=trim(resultado(5)) case "1" rua=trim(resultado(12)) endereco=trim(resultado(14)) bairro=trim(resultado(10)) cidade=resultado(8) estado=resultado(6) case else resultado1 = trim(resultado(4)) texto = "Falha ao buscar cep: "& resultado1 end select end if

doc, txt, pdf

Eu fiz o que você disse o caminho está certo eu copie e colei dentro da barra e abriu o arquivo direto to achando estranho isso, não sei mais o que fazer, já tentei de tudo.

Eu fi o que você falou mas ele não da erro mas também não abre o arquivo. Já pesquisei mas não sei mais o que fazer.

Oi pessoal, eu tenho uma página onde o nome do arquivo e o endereço vem do bano de dados, o meu problema é: eu não consigo abir quando eu clico no botão da esse erro aqui: HTTP/1.1 404 Object Not Found. Segue o código: <%@LANGUAGE="VBSCRIPT"%> <% Option explicit %> <!--#Include file="conexao/conexao.asp"--> <% response.expires=0 dim conexaoDataBase,ConnString,sqlArquivo,rsArquivo,codigo_contrato,objStream,nome_arquivo,nome,caminho,vit codigo_contrato = trim(Request.QueryString("codigo_contrato")) call abreConexao sqlArquivo ="select * from nomearquivo where codigo_contrato='"&codigo_contrato&"' " set rsArquivo = conexaoDataBase.execute(sqlArquivo) %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title></title> <style type="text/css"> <!-- .style1 {font-size: x-small; font-family: Verdana, Arial, Helvetica, sans-serif; } a:link { color: #990000; text-decoration: none; } a:visited { text-decoration: none; color: #990000; } a:hover { text-decoration: underline; color: #990000; } a:active { text-decoration: none; color: #990000; } .style2 {font-size: 12px} --> </style> <link rel="stylesheet" type="text/css" href="css/hondadef.css"> <style type="text/css"> <!-- .style4 {font-size: x-small} --> </style> </head> <link rel="stylesheet" type="text/css" href="contratos/css/hondadef.css"> <body> <div align="center"> <table width="650" height="400" align="center"> <tr> <td align="left" valign="top" bgcolor="#FFFFFF" > <img src="imagem/honda.jpg"> <table width="100%" border="0" align="center"> <% if rsArquivo.eof then %> <script> alert("Não exite nenhum arquivo!"); window.close(); </script> <% else nome = rsArquivo("nome_arquivo") caminho = rsArquivo("caminho_arquivo") %> <tr bgcolor="#DEDFDE" class="style1"> <td width="91%" class="style2"><div align="center">Visualizar Arquivo(s)</div></td> </tr> <% do while not rsArquivo.eof vit = caminho &"/"& nome %> <tr bgcolor="#DEDFDE"> <td><a href="vit"><%=rsArquivo("nome_arquivo")%></a></td> </tr> <% rsArquivo.movenext loop end if %> </table> </tr> </table> </div> </body> </html> <% call fechaConexao %>

Olá pessoal estou upload, mas não estou conseguindo pegar os nomes dos campo para inserir no banco de dados. algúem pode me ajudar por favor. call abreconexao dim conexaoDataBase,ConnString,objUpload,objNextFile,caminho,codigo_contrato,nome_ar uivo,sql_insere,tab_insere Set objUpload = server.CreateObject("Dundas.Upload.2") objUpload.MaxFileSize = 1048576 objUpload.UseUniqueNames = false Set objNextFile = objUpload.GetNextFile() caminho = "C:\Inetpub\wwwroot\contratos\Arquivos" nome_arquivo = objUpload.form("nome") codigo_contrato = objUpload.form("numero") response.write(codigo_contrato) response.end If objUpload.FileExists(caminho & "\" & objNextFile.FileName) Then %> <script language="javascript"> window.alert('Este arquivo já existe!'); window.close(); //window.location.href="../default.asp"; </script> <% Else objNextFile.Save caminho sql_insere = "INSERT INTO nomearquivo (nome_arquivo, caminho_arquivo, codigo_contrato) VALUES ('"& nome_arquivo &"','"& objNextFile.FileName &"' , '"&codigo_contrato&"')" set tab_insere = conexaoDataBase.execute(sql_insere) %> <script language="javascript"> window.alert('Arquivo salvo com sucesso'); window.location.href="../cartoes_virtuais.asp"; </script> <% End If Set objUpload = Nothing

eu fiz assim:

Olá pessoal como fazer em javascript para que quando clicar numa imagem limpar os campos do formulario.