Jump to content
Fórum Script Brasil
  • 0

[resolvido] Asp+mysql


eduardo.d2
 Share

Question

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>

Edited by bareta
USAR TAGS!!! BARETA...
Link to comment
Share on other sites

20 answers to this question

Recommended Posts

  • 0

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

Edited by eduardo.d2
Link to comment
Share on other sites

  • 0

a pagina ta vindo mesmo do post do formulario?? porque o que parece é que todos os requests tão vindo em branco. você devia testar antes se eles vem em branco.

alias, pelo que eu to vendo você ta fazendo o insert sem nem postar o formulario antes. do jeito que ta agora, ele vai fazer o insert toda vez que abri a pagina.

tipo, ponha um input hidden no seu form com um valor qualquer. e antes de fazer o insert, teste se esse request tem valor. se tiver é porque o formulario foi postado. exemplo:

<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>[/code] e antes de fazer o insert teste:
[code]If Request.Form("post") = "post" Then
     - AQUI você FAZ O INSERT -
End If

Link to comment
Share on other sites

  • 0
Guest Visitante

Cara esta tando erro ainda

Tipo de erro:
Erro de compilação do Microsoft VBScript (0x800A0401)
Fim da instrução esperado
/asp/mercado.asp, line 41, column 32
f Request.Form("post") = "post" Then
Ve se esta certo !!
<%@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">
<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")

f Request.Form("post") = "post" Then
rs = "INSERT INTO fornecedor(id,nome,endereco,telefone,email) VALUES ("& id &","& nome &","& endereco &","& telefone &","& email &"')"
End If
mercado.Execute(rs)


%>
</body>
</html>

Link to comment
Share on other sites

  • 0
Guest --eduardo --

boa noite kuroi agora a pagina esta aparecendo o formulario :) , mais dessa vez quando eu preenche o mesmo da erro o que devo fazer agora ?

esse e o erro

# ipo 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 'tata,54545285,[email protected]')' 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 89 bytes to /asp/mercado.asp

# POST Data:
post=post&id=01&nome=luiz+&endereco=rua+tata&telefone=54545285&email=teste%40super.com.br

# Hora:
quinta-feira, 2 de agosto de 2007, 21:23:13

desde já meu muito obrigado e valeou pela força

Link to comment
Share on other sites

  • 0
Guest Visitante

Não adiantou da uma olhada no meu script

<%@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">
<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 "Preencha corretamente"
End If

%>
</body>
</html>

ver se e isso porque esta aparecendo o mesmo erro !!

Link to comment
Share on other sites

  • 0

faltou um ' no email:

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

mas se esse erro continuar, ou você tiver otro erro de sql, faca aquilo que você fez da outra vez:

==> response.write rs

==> response.end()

e poste pra gente ver a query do comando insert que aparecer

Link to comment
Share on other sites

  • 0
Guest Visitante

Então fiz isso, mais não adiantou !! nem os dados ficam armazenado no mysql e nem aquele insert sai !!

if Request.Form("post") = "post" Then
rs = "INSERT INTO fornecedor(id,nome,endereco,telefone,email) VALUES ("& id &",'"& nome &"','"& endereco &"',"'& telefone &"','"& email &"')"
response.write rs
response.end()
mercado.Execute(rs)

o que eu posso fazer agora ?

Link to comment
Share on other sites

  • 0
Guest Visitante

Cara você sabe como eu faço para que depois de preencher toda a tabela apareca na mesma pagina os dados preenchido e ai sim depois enviar pro banco ?

Link to comment
Share on other sites

  • 0

não entendi direito, é tipo uma tela de confirmacao??

bom se for, você pode escrever todos os dados que vem do request na pagina e também grava-los em inputs hiddens. e ai você poe um botao ou link pra postar o formulario. ai por exemplo, se vai ser na mesma pagina, você pega aquele input hidden com value "post" e poe tipo outro value, tipo "post2". ai quando for o primeiro post, você mostra a confirmacao. quando for o segundo, você insere no banco.

Link to comment
Share on other sites

  • 0

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

%>

Edited by eduardo.d2
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      150.2k
    • Total Posts
      647.4k
×
×
  • Create New...