Ola a todos,
Para quem deseja trabalhar com aplicações Web Sites que utilizam consultas ao banco de dados, vai ai uma dica de como funciona...Estou partindo da idéia de que todos já saibam trabalhar com os componentes do Visual Studio... Se não, vale a pena dar uma olhandinha antes...Vale lembrar ainda que aqui estaremos utilizando uma conexao Access.
-- No anbiente do visual studio abra a view toobox e crie 04 TextBox e 01 Button.
-- De um duplo clique no button e insira o seguinte codigo: não precisa pensar duas vezes.. selecione tudo aqui e substitua tudo. Só peço um pouco de atenção para renomear as palavras que eu coloquei em vermelho. Como o nome da sua classe que deve ser na verdade o nome que voce deu a seu web form... e tambem o caminho do seu arquivo access.
-------------------------------------------------------------------------------------------------------------------------------------------
Imports
System.Data.OleDbPartial Class Nome da Clase
Inherits System.Web.UI.Page Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TextBox4.Text = Now.Date.ToShortDateString()
'Coloca a data automatica no TextBox End Sub
Protected
Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.ClickDim
sql As StringDim conn As OleDbConnection
Dim cmd As OleDbCommand
sql = "INSERT INTO nome_tabela(campo_da_tabela1, campo_da_tabela2,campo_da_tabela3, campo_da_tabela4)"
sql = sql & " values ('" & TextBox1.Text & "', '" & TextBox2.Text & "', '" & TextBox3.Text & "', '" & TextBox4.Text & "')"
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\teste.mdb")
' O Source indica o caminho do banco..aqui no caso diz que esta no diretorio d:\nome_do_banco.mdb
conn.Open()
cmd =
Try
cmd.ExecuteNonQuery()
Catch ex As Exception
Response.Write(ex.ToString())
Finally
conn.Close()
End Try 'Limpar os campos textbox
TextBox1.Text =
""TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = "" End Sub
End
Class--------------------------------------------------------------------------------------------------------------------------------------------
Não Esqueca, para que seja possivel inserir alguma informação no seu banco access é preciso que antes voce o crie e coloque todos os campos necessarios. No nosso exemplo criei no Access um arquivo chamado teste com 04 colunas, sendo que cada coluna será chamada de: campo_da_tabela1, campo_da_tabela2,campo_da_tabela3, campo_da_tabela4.
Agora é so receber os dados atraves da: '" & TextBox1.Text & "', '" & TextBox2.Text & "', '" & TextBox3.Text & "', '" & TextBox4.Text & "'
É isso ai.. qualquer duvida é só mandar um e-mail.
Até a próxima!
Daniel Couto