tutoriais mais recente desenvolvimento web
 

ADO adicionar registros


Podemos usar o SQL INSERT INTO comando para adicionar um registro a uma tabela em um banco de dados.


Adicionar um registro a uma tabela em um banco de dados

Queremos adicionar um novo registro à tabela Clientes na base de dados Adamastor. Em primeiro lugar, criar um formulário que contém os campos que pretende recolher dados a partir de:

<html>
<body>

<form method="post" action="demo_add.asp">
<table>
<tr>
<td>CustomerID:</td>
<td><input name="custid"></td>
</tr><tr>
<td>Company Name:</td>
<td><input name="compname"></td>
</tr><tr>
<td>Contact Name:</td>
<td><input name="contname"></td>
</tr><tr>
<td>Address:</td>
<td><input name="address"></td>
</tr><tr>
<td>City:</td>
<td><input name="city"></td>
</tr><tr>
<td>Postal Code:</td>
<td><input name="postcode"></td>
</tr><tr>
<td>Country:</td>
<td><input name="country"></td>
</tr>
</table>
<br><br>
<input type="submit" value="Add New">
<input type="reset" value="Cancel">
</form>

</body>
</html>

Quando o usuário pressiona o botão enviar o formulário é enviado para um arquivo chamado "demo_add.asp" . O "demo_add.asp" arquivo contém o código que irá adicionar um novo registro à tabela Clientes:

<html>
<body>

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"

sql="INSERT INTO customers (customerID,companyname,"
sql=sql & "contactname,address,city,postalcode,country)"
sql=sql & " VALUES "
sql=sql & "('" & Request.Form("custid") & "',"
sql=sql & "'" & Request.Form("compname") & "',"
sql=sql & "'" & Request.Form("contname") & "',"
sql=sql & "'" & Request.Form("address") & "',"
sql=sql & "'" & Request.Form("city") & "',"
sql=sql & "'" & Request.Form("postcode") & "',"
sql=sql & "'" & Request.Form("country") & "')"

on error resume next
conn.Execute sql,recaffected
if err<>0 then
  Response.Write("No update permissions!")
else
  Response.Write("<h3>" & recaffected & " record added</h3>")
end if
conn.close
%>

</body>
</html>

Importante

Se você usar o comando SQL INSERT estar ciente do seguinte:

  • Se a tabela contém uma chave primária, certifique-se de acrescentar um valor único, não-nulo para o campo de chave primária (se não, o provedor pode não acrescentar o registro, ou ocorre um erro)
  • Se a tabela contém um campo AutoNumeração, não inclua esse campo no comando SQL INSERT (o valor deste campo será realizado automaticamente pelo provedor)

E sobre campos sem dados?

Em um banco de dados MS Access, você pode digitar seqüências de comprimento zero ("") no texto, Hyperlink, e campos Memo Se você definir a propriedade PermitirComprimentoZero para Sim.

Note: Nem todos os bancos de dados suportam cadeias de comprimento zero e pode causar um erro quando um registro com campos em branco é adicionado. É importante verificar quais os tipos de dados do banco de dados suporta.