Ir para conteúdo
Fórum Script Brasil

eduardo.d2

Membros
 Perfil  Explorar Conteúdo

  • Total de itens

    10

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por eduardo.d2

  1. Mysql Gerendo Um Numero Aliatorio

    em MySQL

    Postado

    Bom dia a todos, gostaria de saber como eu faço para que o mysql gere um numero aliatorio e não repetitivo ex:

    criei um formulario em asp que tem o "id" e toda vez que você inseriu ex:1 ele aceita gostaria de cria um rotina que não permiti-se numero repitido será que isso e possivel ?

  3. [resolvido] Asp+mysql

    em ASP

    Postado · Editado por eduardo.d2

    Então kuroi ainda esta dando pau no meu script asp !!!quando você termina de preencher os campos do formulario e clica em enviar aparece essa tela 

    # Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 3.51 Driver][mysqld-5.0.41-community-nt]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1
/asp/mercado.asp, line 43

# Tipo de navegador:
Mozilla/5.0 (Windows; U; Windows NT 5.1; pt-BR; rv:1.8.1.6) Gecko/20070725 Firefox/2.0.0.6

# Página:
POST 92 bytes to /asp/mercado.asp

# POST Data:
post=post&id=01&nome=jljlk&endereco=klkjljljl&telefone=45464655&email=kjlkjll%E7%E7lkk%E7lkl

# Hora:
domingo, 5 de agosto de 2007, 01:32:02
 [/coide]

segue o script!!
[code]
[code]<html>
<head>
<title>mercado</title>
</head>
<body><font size="5"><font face="verdana" color="aqua"><center>Conexão com o banco</center>
</font>

<form method="post" action="mercado.asp">
<input type="hidden" name="post" value="post"/>
<p>ID:<INPUT TYPE="text" name="id">
<p>Nome:<input type="text" name="nome" >
<p>Endereco:<input type="text" name="endereco">
<p>Telefone:<input type="text" name="telefone">
<p>E-mail:<input type="text" name="email">
<p><input type="submit" value="Enviar">
</form>
<%

' Variáveis de conexão
Dim tabela, db, host, usuario, senha, rs
tabela = "fornecedor"
db = "mercado"
host = "localhost"
usuario = "root"
senha = "andrade"

Set mercado = Server.CreateObject("ADODB.Connection")
mercado.ConnectionString = "Driver={MySQL ODBC 3.51 Driver};server="& host &";database="& db &";uid="& usuario &";pwd="& senha &";"
mercado.Open()

' Recebendo valores
Dim id, nome, endereco, telefone, email
id = request.Form("id")
nome = request.Form("nome")
endereco = request.Form("endereco")
telefone = request.Form("telefone")
email = request.Form("email")

if Request.Form("post") = "post" Then
rs = "INSERT INTO fornecedor(id,nome,endereco,telefone,email) VALUES ('"& id &"','"& nome &"','"& endereco &"',"'& telefone &"','"& email &"')"
mercado.Execute(rs)
response.Write"cadastrado com sucesso"
response.end()
End If

%>

  5. [resolvido] Asp+mysql

    em ASP

    Postado · Editado por eduardo.d2

    então o que acontece e que não consigo armazena o dados no meu banco mysql. E que quando preenchido meu formulario ele não armazena no banco já inserir esse dois comando ai em baixo 

    rs = "INSERT INTO fornecedor (id,nome,endereco,telefone,email) VALUES ("& id &","& nome &","& endereco &","& telefone &","& email &")"
    ==>   response.write rs
    ==>  response.end()
             mercado.Execute(rs)
    mais o que acontece, não da mais erro mais no rodapé da pagina aparece o comando insert 
    INSERT INTO fornecedor (id,nome,endereco,telefone,email) VALUES (,,,,')

    E o erro que ta quando eu não insiro esse comado e esse

    Tipo de erro:

    Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

    [MySQL][ODBC

    3.51 Driver][mysqld-5.0.41-community-nt]You have an error in your SQL

    syntax; check the manual that corresponds to your MySQL server version

    for the right syntax to use near ''','','','')' at line 1

    /asp/mercado.asp, line 41

    se poderem me ajudar agradeço

  6. [resolvido] Asp+mysql

    em ASP

    Postado · Editado por bareta
    USAR TAGS!!! BARETA...

    Olá pessoal!! estou tendo problema para que meu script em asp se conecte com meu banco de dados MYSQL alquem poderia me ajudar ? meu script esta logo abaixo 

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>mercado</title>
</head>
<body><font size="5"><font face="verdana" color="aqua"><center>Conexão com o banco</center>
</font>

<form method="post" action="mercado.asp">
<p>ID:<INPUT TYPE="text" name="id">
<p>Nome:<input type="text" name="nome" >
<p>Endereco:<input type="text" name="endereco">
<p>Telefone:<input type="text" name="telefone">
<p>E-mail:<input type="text" name="email">
<p><input type="submit" value="Enviar">
</form>
<%

' Variáveis de conexão
Dim tabela, db, host, usuario, senha, rs
tabela = "fornecedor"
db = "mercado"
host = "localhost"
usuario = "root"
senha = "andrade"

Set mercado = Server.CreateObject("ADODB.Connection")
mercado.ConnectionString = "Driver={MySQL ODBC 3.51 Driver};server="& host &";database="& db &";uid="& usuario &";pwd="& senha &";"
mercado.Open()

' Recebendo valores
Dim id, nome, endereco, telefone, email
id = request.Form("id")
nome = request.Form("nome")
endereco = request.Form("endereco")
telefone = request.Form("telefone")
email = request.Form("email")

rs = "INSERT INTO fornecedor (id,nome,endereco,telefone,email) VALUES ("& id &","& nome &","& endereco &","& telefone &","& email &")"

mercado.Execute(rs)


%>
</body>
</html>

  10. Meu Programa Em Asp Não Roda

    em ASP

    Postado

    Boa noite a todos !!!!

    desenvolvi um programa em asp que utiliza um banco de dados access, pois bem quando coloco para rodar não aparece nada, eu utilizo o firefox e o IE mais o firefox me mostra a linha que esta errada e o IE so me mostra pagina não pode ser exibida ai embaxo esta o programa

    <%

    dim conEditora

    dim rsLivros

    const cntcaminho="C:\Documents and Settings\Administrador\Meus documentos\editora.mdb"

    set conEditora= server.CreateObject("ADODB.Connection")

    set rsLivros=server.CreateObject("ADODB.Recordset")

    conEditora.Open "drive={Microsoft Access Driver(*.mdb)};dbq=" & cntCaminho

    rsLivros.Open "Livros",conEditora

    Response.Write "Código:"&

    rsLivros.Fields("codLivro")&"<br>"&"Titulo do Livro:"& rslivros.Fields("Titulo")

    rsLivros.Close

    conEditora.Close

    %>

    que poder me ajudar agradeço

×
×
  • Criar Novo...