jntk
-
Total de itens
245 -
Registro em
-
Última visita
Tudo que jntk postou
-
Ae.., pode mandar no email: jonatasteclados@yahoo.com.br Valeu...
-
Hum.., no site da morotora não tem... Se alguém tiver ou souber onde achar, me avise.. Abraço...
-
Ae.., tenho um celular Motorola c350, e consegui um cabo serial pra conecta-lo no micro. Só que para isso preciso de um software... Alguém tem ou sabe como posso conseguir, fazer o download desse programa? Desde já agradeço, Valeu....
-
Galera to com um problema no meu IIS, já desinstalei, instalei, desistalei d novo, instalei d novo, e nada.... O problema é o seguinte: Quando tento abrir minha página ele da o erro: "HTTP 500 - erro interno do servidor", não é problema nos códigos de minha página com certeza, porque estavão funcionando corretamente e simplesmente num belo dia, comçou a dar esses paus..., não consigo nem abrir a própria página padrão do IIS, que vem qd você o instala... Please, me ajudem...... Valeu...
-
Ah era o lance de permissão mesmo. Pode fechar o tópico. Valeu....
-
Galera resolvido! O problema não era de código. Era que o meu servidor tem uma pasta específica para banco de dados, pois se colocar o bd em qualquer outra pasta não funciona. Coloquei o bd na pasta específica, e mudei o código para o novo endereço do banco e funcionou corretamente. Pra ver: http://www.ieqquitauna.com.br/book/index.asp Valeu a todos.. Abraço
-
Como faço pra habilitar?
-
Galera é o seguinte, tenho esse código que recebe os dados de um formulário e os inclui em um banco de dados MDB. No meu computador com o ISS, funciona normalmente, inclui, etc.... Só que quando publico da erro: "HTTP 500 - erro interno do servidor Internet Explorer" Por favor, me ajudem vendo se há algum erro: <% @ Language=VBScript %> <HTML> <HEAD> </HEAD> <BODY> <% 'Efetuando a conexão com a base de dados '-------------------------------------------------------------------------- Set Conn = Server.CreateObject("AdoDb.Connection") Conn.provider="Microsoft.Jet.OLEDB.4.0" Conn.connectionstring=Server.Mappath("database/visitas_ieqquitauna.mdb") Conn.open '-------------------------------------------------------------------------- 'criar o objeto RecordSet 'isso ira acessar a tabela do banco de dados Set RS = Server.CreateObject ("ADODB.Recordset") SQL="select * from visitas" RS.Open SQL, Conn, 3, 3 'verificação dos campos obrigatórios nome=Request.Form ("nome") email=Request.Form ("email") pais=Request.Form ("pais") estado=Request.Form ("estado") cidade=Request.Form ("cidade") 'homepage=Request.Form ("homepage") comentarios=Request.Form ("comentarios") if (nome="") then mensagem_nome="Preencha o Campo Nome" faltou_dado="Sim" faltou_nome="Sim" end if if (email="") then mensagem_email="Preencha o Campo Email" faltou_dado="Sim" faltou_email="Sim" end if if (pais="") then mensagem_pais="Preencha o Campo Pais" faltou_dado="Sim" faltou_pais="Sim" end if if (estado="") then mensagem_estado="Preencha o Campo Estado" faltou_dado="Sim" faltou_estado="Sim" end if if (cidade="") then mensagem_cidade="Preencha o Campo Cidade" faltou_dado="Sim" faltou_cidade="Sim" end if if (comentarios="") then mensagem_comentarios="Preencha o Campo Comentarios" faltou_dado="Sim" faltou_comentarios="Sim" end if 'gravar informações no banco de dados if faltou_dado<>"Sim" then RS.AddNew RS.Fields ("Name")= Request.Form ("nome") RS.Fields ("Email")= Request.Form ("email") RS.Fields ("Country")= Request.Form ("pais") RS.Fields ("State")= Request.Form ("estado") RS.Fields ("City")=Request.Form ("cidade") RS.Fields ("HomePage")=Request.Form ("homepage") RS.Fields ("Comment")=Request.Form ("comentarios") RS.Update RS.Close set visitas=Nothing Response.Write "<center><br><br><font size=5 color=""#FF9900"">Mensagem Postada com Sucesso!</font><br><br>" Response.Write "<em><br>Obrigado por postar em nosso livro de visitas, volte sempre!</em><br><br>" Response.Write "<br><a href=index.asp>Ler as Mensagens do Livro</a>" Response.Write "<br><br>" Response.Write "<br><a href=form_book.htm>Postar outra Mensagem</a>" end if 'se acaso os dados não foram preenchidos mostra os campos necessários if faltou_nome="Sim" then Response.Write "O campo <b>Nome</b> deve ser preenchido<br><br>" end if if faltou_email="Sim" then Response.Write "O campo <b>E-mail</b> deve ser preenchido<br><br>" end if if faltou_pais="Sim" then Response.Write "O campo <b>País</b> deve ser preenchido<br><br>" end if if faltou_estado="Sim" then Response.Write "O campo <b>Estado</b> deve ser preenchido<br><br>" end if if faltou_cidade="Sim" then Response.Write "O campo <b>Cidade</b> deve ser preenchido<br><br>" end if if faltou_comentarios="Sim" then Response.Write "O campo <b>Comentários</b> deve ser preenchido<br><br>" end if %> </BODY> </HTML> Pra quem quiser ver isso publicado vai ai o link do teste: fomulário: http://www.ieqquitauna.com.br/book/form_book.htm página que le o banco: http://www.ieqquitauna.com.br/book/index.asp página que incui (q que esta com o erro): http://www.ieqquitauna.com.br/book/inclui.asp Aguardo por ajuda!!!!!
-
Tendi sim..., valeu.......
-
Apesar desse banco não ser algo muito importante e restrito o que me aconselha a fazzer?
-
Cara valeu..., problema resolvido... Abraço..., valeu mesmo....
-
Cara, eu olhei esses tópicos, até achei os códigos, mas não consegui inserir no meu código. Não consegui coloca-los em "armonia" com minha página. Se puderem me ajudar, ficarei muito grato. Abraço...
-
Galera estou conectando meu banco de dados (mdb) atravé do seguinte código: 'criar conexão com o banco set conn=Server.CreateObject ("ADODB.Connection") 'abrindo uma conexão com o arquivo "visitas_ieqquitauna" conn.ConnectionString = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\Inetpub\wwwroot\ieq\visitas_ieqquitauna.mdb" conn.Open 'criar o objeto RecordSet 'isso ira acessar a tabela do banco de dados set visitas=Server.CreateObject ("ADODB.Recordset") visitas.Open "visitas", conn, 3, 3 MAS...., quando eu publicar essa página e o banco, como devo alterar meu código para apontar corretamente ao banco de dados? (....source=???) E/ou se tenho que alterar algo mais? Abraço
-
Tentei, deu erros, não funcionou, ai fiquei com raiva e apaguei tudo, só deixei o q tava funcionando... Me ajudem ae, pessoal..rs...
-
Galera é o seguinte, eu já fiz uma pesquisa no fórum, já li os tópicos, re li alguns, e não consegui encaixar no que eu preciso. Tipo to aprendendo asp na raça, na unha.., sosinho..., e preciso fazer uma paginação em meu código no qual não consegui, mesmo usando os prontos que achei. Se alguém puder me ajudar, preciso de uma paginação simples que fique apenas 10 registros em cada página, a apareça o link para "proxima" e "anterior". (e os numeros d página se possível) Ai vai o meu código: <HTML> <HEAD> <title>Mensagens do Livro</title> </HEAD> <BODY> <h1> <font color=#CCCCCC size="5" face="Arial, Helvetica, sans-serif">Mensagens Postadas</font> </h1> <% 'Criar uma conexão com o banco de dados 'objeto tipo connection 'cria objeto do tipo ADODB.Connection Set conn=Server.CreateObject ("ADODB.Connection") 'abrindo uma conexão com a fonte ODBC "visitas_ieqquitauna" conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\Inetpub\wwwroot\ieq\visitas_ieqquitauna.mdb" 'criando instrução sql 'para listar dados inst_sql="SELECT visitas.Name, visitas.Email, visitas.HomePage, visitas.Comment, visitas.City, visitas.Country, visitas.State FROM visitas" 'criar objeto RecordSet Set visitas=Server.CreateObject ("ADODB.Recordset") 'executar a instrução sql visitas.Open inst_sql, conn, 3, 3 'montar tabela com o resultado da consulta %> <% 'visitas.MoveNext do while not visitas.EOF %> <p> <hr> <table width="75%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr bgcolor="#CCCCCC"> <td width="17%">Nome:</td> <td width="83%"><%=visitas.Fields("Name")%></td> </tr> <tr> <td>E-mail:</td> <td><%=visitas.Fields("Email")%></td> </tr> <tr bgcolor="#CCCCCC"> <td>País:</td> <td><%=visitas.Fields("Country")%></td> </tr> <tr> <td>Cidade:</td> <td><%=visitas.Fields("City")%></td> </tr> <tr bgcolor="#CCCCCC"> <td>Estado:</td> <td><%=visitas.Fields("State")%></td> </tr> <tr> <td>Home Page: </td> <td><%=visitas.Fields("HomePage")%></td> </tr> <tr bgcolor="#CCCCCC"> <td>Comentário:</td> <td><%=visitas.Fields("Comment")%></td> </tr><br> <% visitas.MoveNext loop %> </table> <p> </p> <hr> </body> </html>
-
Não tah tão caro!!!.... Q mídia é? tu sabe? Ae.., posso fazer um precinho melhor.... Uso midias melhores tb..... Vamo lá...
-
Estão só em AVI ou tem algum Codec tipo o DIVx? pois eu quero para o DVD Player e ele não aceita arquivos AVI compactados. É, infelizmente necessitam de Codec DIVx.... Mas pra quem quer assitir no pc, tranquilo...., imagem perfeita, som perfeito..... Enteressados?.....
-
Bem..., os meus estão em AVI
-
Ae galera, aproveitando...... Tenho cds de todos os capitulos da "Caverna do Dragão" Só não tem o último capitulo, né..., hehehe Quem se enteressa? Estou vendendo....... Qualquer coisa me adiciona no MSN..... MSN: jonatas@soares.com.br Falowww
-
Talevez esse tópico lhe ajude: http://scriptbrasil.com.br/forum/index.php?showtopic=39225 Um abraço