Jump to content


eduardo.d2

Member Since 22/12/2006
Offline Last Active 10/09/2007, 16:17
-----

Posts I've Made

In Topic: Conectando O Asp Com Mysql

29/07/2007, 18:17

não estou conseguindo me conectar esse e meu script
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR...nsitional.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>

esse site eu já fui exite duas variaveis que eu não inserir no meu script, que são o (option e o port) pq não entendi a necessidade de coloca-los se vc poder me ajudar ficarei feliz

IPB Skin By Virteq