About Syed Adeel Rizvi Expertise I can answers questions regarding web based and desktop based programming in VB.Net. Which can include XML, Custom Controls + Computer Hardware and Windows Turboshooting...etc.
More Skills :
1 . PHP - > All Type Of CMS e.g. (Joomla,Drupul,PHPNuke...etc)
2 . ASP
3 . ASP.Net
4 . CMS
5 . MySql
6 . SQl Server 2000 & 2005
7 . Ms Access
8 . Web Designing
9 . Networking Turboshooting
10 . Windows Turboshooting
11 . Hardware Turboshooting
All Type Of Work Related To IT
I also Do Work as a Freelance as Application & Web Developer & Designer
Experience i have 3 years work experience in software house and 4 years work experience for computer hardware and Networking..
Expert: Syed Adeel Rizvi Date: 4/24/2007 Subject: inserting a record
Question Hello,
I am trying to run this code to insert data into microsoft access table. But it is giving me an error().
Dim cn As OleDbConnection = New OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;" & _
"Data Source=C:\Car leasing.mdb;")
cn.Open()
Dim cmd As New OleDbCommand
'Dim cmd As String
cmd.Connection = cn
Dim adp As New OleDbDataAdapter
cmd.CommandText = "select * from customer"
cmd.CommandType = CommandType.Text
adp.SelectCommand = cmd
' OBJ.dscmd = New OleDbDataAdapter(cmd, OBJ.con)
Dim ds As New DataSet
'OBJ.dscmd.Fill(OBJ.ds, cmd)
adp.Fill(ds, "customer")
OBJ.tbrows = ds.Tables("customer").NewRow()
plzzzz let me know what's wrong with this code
Really needed
Thanxs in adv.
Answer hello sir try this
Dim Conn As New Data.OleDb.OleDbConnection
Dim cmd As Data.OleDb.OleDbCommand
Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;""Data Source=C:\Car leasing.mdb"""
Conn.Open()
'Dim cmd As String
cmd = Conn.CreateCommand
Dim adp As New OleDb.OleDbDataAdapter
cmd.CommandText = "select * from customer"
cmd.CommandType = CommandType.Text
adp.SelectCommand = cmd
' OBJ.dscmd = New OleDbDataAdapter(cmd, OBJ.con)
Dim ds As New DataSet
'OBJ.dscmd.Fill(OBJ.ds, cmd)
adp.Fill(ds, "customer")
