Fábio freitas
-
Total de itens
61 -
Registro em
-
Última visita
Tudo que Fábio freitas postou
-
Olá Graymalkin. Primeiramente obrigado. O exemplo citado ele pega o endereço mac do servidor e não da máquina que está acessando. Sabe como pegar o endereço da máquina que acessa? Um abraço Fábio Santos
-
Olá Andersonjb, Primeiramente obrigado, não estou conseguindo pegar as dimensões, você tem algum exemplo. Desde já agradeço Fábio Santos
-
Olá Amigos, Alguém sabe aonde posso encontrar exemplo em vb de upload de imagens, pois fazer o upload do arquivo está tranquilo, mas eu gostaria de filtrar alguns casos: Extensão : Somente gif e jpg Tamanho : Kb Dimensão : X por Y Desde já agradeço Fábio Santos
-
Olá Amigos, Gostaria de saber como em vb poderia pegar as informações da placa, que segundo andei lendo não se repete, li também algo sobre Mac Address, existe alguma maneira de pegar esta informação da máquina que está acessando o aplicativo. Desde já agradeço Fábio Santos
-
Olá Renato fiz assim: <script language="javascript"> <!-- var shell; function SetPrintProperties() { shell = new ActiveXObject('WScript.Shell'); shell.SendKeys('%fu'); window.setTimeout('java script:SetPaperSize();', 1200); window.setTimeout('java script:shell.setLandScape();', 2000); } function SetPaperSize() { shell.sendKeys('%a{TAB}.2{TAB}0{TAB}0{TAB}0{ENTER}'); } function setLandScape() { shell.sendKeys('%fu'); window.print(); } //--> </script> E inseri um botão e no evento onclick = coloquei "setlandscape();" Não sei se está certo, gostaria que a página abrisse ou fosse impressão em paisagem sem o usuário precisar alterar nas propriedades
-
Olá Renato, Primeiramente obrigado, Esse código está certo? É assim mesmo shell.SendKeys('%fu'); e depois shell.sendKeys('%fp'); Pois não aconteceu o esperado. Um abraço Fábio Santos
-
Olá Amigos, Alguém tem algum exemplo que realmente funcione a impressão em landscape, pois fiz algumas pesquisas, mas nunca obtive um resposta satisfatória. Desde já agradeço, Fábio Santos
-
Olá, Estou com um serio problema, que acho que só poderia ser resolvido por uma função. Tenho um botão que chama uma janela MODAL, que esta ali para que seja feita uma inclusão ou alteração no meu banco de dados, mas preciso dar um refresh na tela que esta atras ao fechar a janela MODAL. Com pop-up até já consegui, mas com MODAL não. Desde já agradeço a atenção. Fábio Freitas.
-
Segue abaixo código completo, abrigado pela ajuda Um abraço Fábio Freitas <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Conectar</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- .estilo { text-decoration: blink; font-family: Verdana; font-size: 9cm; font-style: normal; color: #000099; } .estilo a:link { font-weight: normal; color: #000099; text-decoration: blink; font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9px; font-style: normal; } .estilo a:visited { font-weight: normal; color: #000099; text-decoration: none} .estilo a:hover { font-weight: normal; color: #0099FF; text-decoration: none} .estilo a:active { font-weight: normal; color: #000099; text-decoration: none} --> </style> <body> <% Caminho = Server.MapPath("noticias.mdb") strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source=" & Caminho Set Conn = Server.CreateObject("adodb.connection") Conn.Open(strConn) If Err.Number<>0 Then Response.Write(Err.Description) Else Response.Write("Conexão está OK") End If %> </body> </html> EDITADO: Utilize as Tags CODE ou QUOTE quando for postar códigos
-
ESTÃO TODOS AI A LINHA 33 É Conn.Open(strConn)
-
Agradeço a todos os amigos que estao me ajudando, com ela consegui me conectar ao banco de dados, porém quando fui fazer a página de inclusão, a de consulta ~passou a não funcionar, ficarei grato por uma nova ajuda. Abaixo o código e o erro: <-- CONSULTAR DADOS --> <% Caminho = Server.MapPath("noticias.mdb") strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source=" & Caminho Set Conn = Server.CreateObject("adodb.connection") Conn.Open(strConn) If Err.Number<>0 Then Response.Write(Err.Description) Else Response.Write("Conexão está OK") End If %> <--ERRO --> <-- INCLUIR DADOS --> PODE ESTA HAVENDO ALGUM CONFLITO DESDE JÁ AGRADEÇO Editado: Utilize as Tags Disponíveis para formatar seus textos.
-
Olá Amigos, Estou como uma pequena dúvida, será que alguém pode me salvar? Abaixo está o código, aonde: Nome do banco = noticias.mdb tabela = news campos da tabela = chamada,noticia e link Aparece o seguinte erro: Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Microsoft Access Driver] Field 'news.chamada' cannot be a zero-length string. /fabiofreitas/inserir.asp, line 41 Ficarei grato pela ajuda.. <% set db = server.CreateObject("ADODB.connection") dim caminho caminho = server.MapPath("noticias.mdb") db.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & caminho chamada = request.form("chamada") noticia = request.form("noticia") link = request.Form("link") sql = "INSERT INTO news (chamada, noticia, link)" sql = sql & "VALUES" sql = sql & " ('"& chamada &"', '" & noticia &"', '"& link &"')" set rs = db.execute(sql) response.redirect "conecta_noticias.asp" rs.close db.close set rs = nothing set db = nothing %> <form action="conecta_noticias.asp" method="post" name="dados" id="dados" > <table width="100%" border="0" cellpadding="0" cellspacing="0" class="fonte"> <tr > <td colspan="2"> </td> </tr> <tr > <td colspan="2"><div align="center"><strong>Inserir Noticias</strong></div></td> </tr> <tr> <td width="6%" height="31" ><font size="-1" face="Arial, Helvetica, sans-serif">Chamada :</font></td> <td width="88%" ><font size="2" face="Arial, Helvetica, sans-serif"> <input name="chamada" type="text" class="input2" id="chamada" size="40"> </font></td> </tr> <tr> <td height="185" valign="top" >Noticia:</td> <td ><p> <textarea name="noticia" cols="70" rows="10" id="textarea" class="input2" ></textarea> <font size="-1" face="Arial, Helvetica, sans-serif"> </font></p></td> </tr> <tr> <td > <div align="right"></div> <div align="left">Link:</div></td> <td ><input name="link" type="text" class="input2" id="resumo2" size="100"></td> </tr> <tr align="left" valign="top" > <td colspan="2"> <p align="center">pp</p></td> </tr> <tr> <td colspan="2" > <div align="center">7p 77</div> <div align="center"> <input type="submit" name="Submit" value="Enviar"> <input type="reset" name="Submit2" value="Limpar"> 7</div> </td> </tr> </table> </form>
-
Estou tentando me conectar com um banco de dados, porém estou começando com esse negócio, gostaria que alguém me ajudasse, abaixo algumas informações: nome do banco de dados = noticias.mdb nome da tabela = news sem DSN Dentro da tabela tem dois campos: numero e noticia Gostaria de apresentar na página estas informações. Bom espero que eu tenha sido claro. Desde já agradeço Fábio Freitas <% Option Explicit Dim objConect, objRst Set objConect = Server.CreateObject("ADODB.Connection") objConect.Provider="Microsoft.Jet.Oledb.4.0" objConect.ConnectionString=Server.MapPath("noticias.mdb") objConect.Open Set objRst = Server.CreateObject("ADODB.RecordSet") objRst.Open "SELECT news FROM SysObjects WHERE XType='S'", objConect, 1, 3 With Response .Write "<p>" .Write "<font face=verdana size=2><b>" .Write "Tabelas Criadas pelo Usuário" .Write "</b></font><p>" End With Do While Not objRst.EOF With Response .Write "<font face=verdana size=1>" .Write "<li>" & objRst("news") & "</li>" .Write "</font>" End With objRst.MoveNext Loop Set objRst = Nothing Set objConect = Nothing %>
-
Ola Amigos, Bom estou trabalhando com o inno setup e consigo criar o programa porém ele fica muito grande. Teria como extrair um arquivo exe, mas que não apareça aquela tela do DOS, que seja extraido automático, caso alguém saiba com faze-lo, agradeceria a ajuda, Um abraço Fábio Freitas
-
lembrando seria um menu pop-up que o menu fica na frane superior e o conteudo será aberto dentro da frame inferior.
-
Utilizando menu pop-up?
-
OLA AMIGOS!! Alguém tem algum exemplo de site ou sabe alguma maneira de colocar o conteudo do menu abrindo sobre a frame, tinha um site www....brasil.com.br, mas ele agora esta fora do ar
-
use está extensão, veja se ajuda http://geocities.yahoo.com.br/fabio_suport...2/banneriii.htm
-
Sei que estou sendo confuso, resumindo .... Teria como eu colocar o iframe, mas configura-lo para abrir certo na página, que a barra de rolagem da iframe fique no canto dela para não parecer que é outra página, caso seja aberto em um outro computador com outra resolução ou até outro navegador
-
Primeiramente obrigado por mais esta ajuda.. Bom já haviamos conversado sobre isso, mas a minha dúvida é se eu conseguiria colocar o iframe no lugar do frame, pois usando o Front Page após dividir os frames posso coloar o endereço do dite (http://www ). na verdade aonde seria o frame aonde esta todo aquele texto seria um iframe, e em relação a resolução da página, por exemplo no iframe (http://drea,...) teria como coloca-lo o mais parecido possível.
-
Segue o link http://geocities.yahoo.com.br/fabio_suporte2002/ , qualquer coisa estou on-line
-
se eu inserir um iframe dentro da frame na parte inferior o menu não consegue sobrepor o frame inferior, minha ideia era que a frame inferir fosse aberto como um iframe assim eu poderia sobrepor.
-
Veja se vc's podem me ajudar: Tenho 3 (três) frames, uma superior e duas na parte inferior, porem gostaria que uma dessas debaixo fosse um iframe, não sei se fui claro, pois estou tendo um problema com o menu que não sobrepoem a frame debaixo. Caso alguém saiba me explicar ou não tenha entendido favor postar aqui
-
Olá Bom ... a todos. Inseri em meu site algumas páginas com iframe efiquei sabendo por um amigo que nem todos os navegadores conseguem interpretar uma página com iframe. Caso alguém saiba de algo por favor post. Desde já agradeço
-
oi Deividy havia pedido ajuda antes sobre o menu que fica abaixo da frame, pois acho eu com essa camada fixa no topo posso resolver aquele problema.