Ir para conteúdo
Fórum CódigoFonte.net

slocun

Membros
  • Total de itens

    12
  • Registro em

  • Última visita

  1. Boas Pessoal! ja resolvido o problema de inserir, eu agora tentei excluir! mas não estou a ser bem sucedido e não percebo em que consiste o seguinte erro: Cadeia de caracteres de entrada com formato incorrecto. Linha 21: conexao = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & MapPath("GestrofaBD.mdb")) Linha 22: conexao.Open() Linha 23: sql = "Delete From Cliente Where Nr_cliente='" & nr & "'" Linha 24: Comando = New OleDbCommand(sql, conexao) Linha 25: Comando.ExecuteNonQuery() ----- código: <script runat="Server"> Protected Sub Bt_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Bt.Click Dim nr As Long nr = Txt.Text Dim conexao As OleDbConnection Dim Comando As OleDbCommand Dim sql As Long conexao = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & MapPath("GestrofaBD.mdb")) conexao.Open() sql = "Delete From Cliente Where Nr_cliente='" & nr & "'" Comando = New OleDbCommand(sql, conexao) Comando.ExecuteNonQuery() conexao.Close() End Sub Protected Sub Btlimpar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Btlimpar.Click Txt.Text = "" End Sub </Script> espero que me possam ajudar... cumps.
  2. slocun

    inserir dados na BD com ASP.net

    Boas Pessoal!! estou a construir um site em ASP.net e preciso de fazer uma parte para inserir dados numa BD já comecei a construir um código mas deparei-me com o seguinte erro: As alterações pedidas para a tabela não foram bem sucedidas pois iriam criar valores duplicados no índice, na tecla primária ou relacionamento. Altere os dados do campo ou campos que contêm os dados duplicados, remova o índice ou volte a definir o índice para que as entradas possam ser duplicadas e tente de novo. Linha 25: sql = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "', '" & telefone & "')" Linha 26: Comando = New OleDbCommand(sql, conexao) Linha 27: Comando.ExecuteNonQuery() Linha 28: conexao.Close() Linha 29: End Sub ----- codigo completo... <script runat="Server"> Protected Sub Bt_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Bt.Click Dim nome As String Dim telefone As Long nome = Txt.Text telefone = Txt2.Text Dim conexao As OleDbConnection Dim Comando As OleDbCommand Dim sql As String conexao = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & MapPath("GestrofaBD.mdb")) conexao.Open() sql = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "', '" & telefone & "')" Comando = New OleDbCommand(sql, conexao) Comando.ExecuteNonQuery() conexao.Close() End Sub Protected Sub Btlimpar_Click(ByVal sender As Object, ByVal e As System.EventArgs) HandlesBtlimpar.Click Txt.Text = "" Txt2.Text = "" End Sub </Script> ------ deparei-me com este erro na segunda inserção que tentei fazer, depois da primeira ter sido bem sucedida passei a tentar outra mas deu o erro... conseguem ajudar-me? cumps.
  3. slocun

    erro no login em ASP.NET

    Boas Pessoal!! finalmente começo verdadeiramente a trabalhar em asp.net e deparo-me com uma dificuldade que sozinho não consegui ultrapassa-la! por isso peço a voça ajuda... a minha dificuldade é que quando eu introduzo o nome e a password para o login obtenho sempre a mesma resposta de login falhado, ou seja, redimensiona-me sempre para o 'google, quando deveria redimensionar para o 'hotmail, porque introduzi no formulario os mesmos dados que estao dentro da BD. --> HELP <-- código: <%@ Page Language="VB" Debug="true" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %> <configuration> <system.web> <compilation debug="true"/> </system.web> </configuration> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <%@ import namespace="System.Data.OleDb" %> <script runat="Server"> Protected Sub Bt_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Bt.Click Dim Use As String Dim Pass As String Use = txt1.Text Pass = Txt2.Text Dim conexao As OleDbConnection Dim Comando As OleDbCommand Dim Comando2 As OleDbCommand Dim SQLSt As String Dim SQLStm As String conexao = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & MapPath("GestrofaBD.mdb")) conexao.Open() SQLSt = "SELECT Utilizador FROM Login" Comando = New OleDbCommand(SQLSt, conexao) SQLStm = "SELECT Password FROM Login" Comando2 = New OleDbCommand(SQLStm, conexao) If SQLSt = Use And SQLStm = Pass Then Response.Redirect("http://www.hotmail.com") Else Response.Redirect("http://www.google.pt") End If End Sub </Script> <html xmlns="http://www.w3.org/1999/xhtml"> <head runat="server"> <title>Login</title> <style type="text/css"> .style1 { text-align: center; } </style> </head> <body bgcolor="#B9DCFF" style="background-attachment: fixed"> <form id="form1" runat="server"> <div style="height: 479px" class="style1"> <br /> <img src="gest.bmp" style="width: 548px; height: 155px" /><br /> <br /> <br /> Name<br /> <asp:TextBox ID="txt1" runat="server"></asp:TextBox> <br /> Password<br /> <asp:TextBox ID="Txt2" runat="server"></asp:TextBox> <br /> <br /> <asp:Button ID="Bt" runat="server" Text="Entrar" /> </div> </form> </body> </html> --------------------------- agradeço tudo o que puderem fazer por mim... cumps
  4. slocun

    como inserir dados na BD

    Boas Pessoal!! eu estou outra vez com problema na inserção de dados na BD. estou a trabalhar em asp.net apartir do web developer do visual studio 2008 e o meu código começou a dar erro de novo, tentei alterar para corrigir mas nada, fico na esperança que alguém me possa dar uma ajudinha! ponto de situação: ---> a ligação com a BD já está feita, e sem problemas, penso k o erro é nas queries. <%@ Page Language="VB" aspcompat=true Debug="true"%> <configuration> <system.web> <compilation debug="true"/> </system.web> </configuration> <html> <head> <title>Inserir.aspx</title> </head> <body bgcolor="#B9DCFF" style="background-attachment: fixed"> <br> <div align="center"><img border="0" src="file:///F:/ESTAGIO_TIAGO/access/gest.bmp" width="548" height="155"></div> <% Dim Conn, sSQL, RS, RX, xSQL, nome, telefone nome = Request.Form("nome") telefone = Request.Form("telefone") Conn = Server.CreateObject("ADODB.Connection") Conn.Open("GestrofaBD") xSQL = "Select * From Cliente WHERE Nome = '" & nome & "' AND Telefone = '" & telefone & "'" RX = Conn.Execute(xSQL) If RX.eof Then sSQL = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "', '" & telefone & "')" RS = Conn.Execute(sSQL) Else%> <html>Dados já existentes!<br>Nome ou Telefone já registados dentro da base de dados.</html> <%End If%> <br> <br> <br> <br> <h1><div align="center">Registro Inserido</div></h1> <br><br><br><br><br><br><br><br><br><br><br><br><br> <div align="center">Clique <a href = "inserir.html">aqui</a> para voltar.</div> <% Conn.Close %> <body> <html> ------------------------- o erro é o seguinte: [Microsoft][Controlador Microsoft Access de ODBC] Tipo de dados incorrecto na expressão de critérios. Linha 17: Conn.Open("GestrofaBD") Linha 18: xSQL = "Select * From Cliente WHERE Nome = '" & nome & "' AND Telefone = '" & telefone & "'" Linha 19: RX = Conn.Execute(xSQL) Linha 20: If RX.eof Then Linha 21: sSQL = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "', '" & telefone & "')" ----------------------- eu já declarei a variavel telefone como "long" (dim telefone as long) mas deu erro na mesma, embora à uns dias atras o erro seria esse e depois ao declara-la como long deixou de dar o erro, mas agora voltou e ja não sei porque... agradeço toda a ajuda... cumps! :)
  5. Boas Pessoal! eu estou a elaborar um site em ASP.net e já fiz grande parte do código...agora gostaria de por exemplo testar o login, registei-me em http://www.1asphost.com para que aqui torna-se possivel entao a execução do site (pra ja como disse, so o login) mas não estou a conseguir. alguem sabe como devo proceder (passo a passo) para que eu consiga na web fazer o teste final e saber se o código realmente estara a funcionar bem, acedendo sem problema a base de dados. cumpz :)
  6. slocun

    minha sql da erro

    nao...assim nao deu nada :( começo a ficar cansado com isto, voltou a dar o mesmo erro...ja tive a verificar e nao encontrei erro, nao percebo... bem...obrigado na mesma :) cumpz B)
  7. slocun

    ASP.NET - login

    Boas Pessoal!! alguem sabe como fazer para (após feita a ligação com a BD) verificar no login se o usuario e a senha estao registrados na BD, para que depois a pessoa possa ou não entrar no site. espero que me possam ajudar, eu estou mesmo a precisar. cumpz ;)
  8. slocun

    minha sql da erro

    Boas! estou a utilizar uma BD no access, e a construir um site no asp.net...preciso de aceder a BD (ligação que ja fiz com sucesso) para inserir dados. da-me o seguinte erro: Erro de servidor na aplicação '/Wbst2'. [Microsoft][Controlador Microsoft Access de ODBC] O número de valores de consulta e de campos de destino não é o mesmo. o meu codigo é o seguinte: <% Dim nome, telefone, Conn, sSQL, RS nome = Request.Form("nome") telefone = Request.Form("telefone") Conn = Server.CreateObject("ADODB.Connection") Conn.Open("GestrofaBD") sSQL = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "'),('" & telefone & "')" RS = Conn.Execute(sSQL) %> --- agradeço toda a ajuda, ja tentei varias vezes conseguir resolver isto mas não fui bem sucedido. cumpz
  9. slocun

    HELP

    Boas! eu tenho aqui um código Java, queria passa-lo para VB, mas não consigo...será que alguém me dá uma ajudinha?? não sei se tem erros, mas deve ter...porque tentei testa-lo antes de tentar passar para VB e dava erro... agradeço tudo em que me possam ajudar, será uma ajuda preciosa!! obrigado. CODIGO: <% //declara as variáveis que serão usadas na página var nomeusuario=null; var senha=null; var lembrar=null; var destino=null; //Tenta obter um cookie nomeusuario = Request.Cookies("nomeusuario"); //Se o valor retornado for indefinido substitui por null if((""+nomeusuario) == "undefined") nomeusuario = null; //Verifica se existe um destino definido destino = Request.QueryString("destino"); //verifica se o cookie para o nome do usuário esta vazio , se estiver tenta capturar o nome do usuário, a senha e o indicativo para lembrar a senha if((nomeusuario==null) || (nomeusuario=="")) { nomeusuario = Request.Form("nomeusuario"); senha = Request.Form("senha"); lembrar = Request.Form("lembrar"); //aqui estamos permitindo que o login seja efetuado se a senha e o nome forem iguais if((nomeusuario != senha) && !eval("\""+nomeusuario+"\"==\""+senha+"\"")) nomeusuario=null; } // se o nome do usuário e o destino forem indefinidos atribua null if((""+nomeusuario) == "undefined") nomeusuario = null; if((""+destino) == "undefined") destino = null; //se destino for null ou estiver vazio defina para página default : logout.asp if((destino==null) || (destino=="")) destino = "logout.asp"; //Se nome do usuário NÃO for null ou NÃO for vazio então pega ele do cookie if((nomeusuario!=null) && (nomeusuario!="")) { Response.Cookies("nomeusuario")=nomeusuario; //Se lembrar estiver ativo então define uma data de expiração para cookie if(lembrar=="on") { var expire,expireString; var month,year; expire = new Date(); month = expire.getMonth(); year = expire.getFullYear(); if(month == 11) { month = 0; year = year+1; } else { month = month+1; } expire.setMonth(month); expire.setFullYear(year); expireString = expire.toLocaleString(); Response.Cookies("nomeusuario").Expires = expireString; } //direciona o usuário para o destino Response.Redirect(destino); } %>
  10. tentei passar uma imagem JPG para mostrar o que acontece, mas não consegui carrega-la. vou tentar explicar: entrei em painel de control\Ferramentas administrativas\Origem de dados (ODBC) ai selecionei o separador "DNS de sistema" e fiz "adicionar", seleccionei "driver do Microsoft Access (*mdb) e clikei em "concluir", no botao "seleccionar" procurei a BD dei um nome em "Nome de origem" e clikei em "ok". aí deu o erro: "Falha no processo de configuração" espero que me possa ajudar...obrigado por tudo.
  11. slocun

    não consigo ligaçao com a BD!

    Boas! não consigo ligaçao com a BD! estou a trabalhar em ASP e a BD é em access, não consigo fazer a ligaçao ODBC com o access. da o seguinte erro: Falha no processo de configuração. se alguem souber o que se passa eu agradeço explicação :rolleyes: tenho um código que introduzi no web developer que não sei se está correcto porque o erro que me tem dado é sempre para a ligação à base de dados. ponto de situação: <%@ Page Language="VB" aspcompat=true Debug="true" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %> <configuration> <system.web> <compilation debug="true"/> </system.web> </configuration> <html> <head> <title>Tabela</title> </head> <body> <form id="form1" runat="server"> <h1><div align="center">Leitura da tabela</div></h1> <br> <br> <% Dim conn, sSQL, RS conn = Server.CreateObject("ADODB.Connection") conn.open("driver={Microsoft Access Driver (GestrofaBD.mdb)};DBQ=" & Server.MapPath("C:\Documents and Settings\estagio\Os meus documentos\Visual Studio 2008\WebSite1\GestrofaBD.mdb")) sSQL = "select * from Cadastro cliente order by nome" RS = conn.execute(sSQL) %> <table align="center"> <tr> <th>Nome</th> <th>Telefone</th> </tr> <% Do While Not RS %> <tr> <td><%=RS("nome")%></td> <td><%=RS("telefone")%></td> </tr> <% RS.movenext() Loop conn.close()%> </table> <div align="center"> <a href="inserir.html">acrescenter novo registo</a><br> <a href="actualizar.asp">Actualizar um registo existente</a><br> <a href="apagar.asp">apagar um registo</a><br></div> <asp:Image ID="Image1" runat="server" Height="123px" Width="126px" ImageUrl="~/gestrofa 2.bmp" /> </form> </body> </html> ----------------------------------------- agradeço toda a ajuda que me possam dar :D cumpz B)
  12. slocun

    form de login

    Boas! eu estou iniciando a programação em ASP! ainda não sei trabalhar nesta linguagem! tudo o que sei é que será parecida com Visual Basic (linguagem que tenho algum conhecimento, mas não muito), e que envolve também html. O que eu gostava que me pudessem ajudar era no seguinte: criar um formulário de login que ja pudesse fazer ligação com uma Base de Dados, eu também não sei fazer esta ligação. Agradeço em tudo o que possam fazer para me ajudar. :) cumpz B)
×
×
  • Criar Novo...