| | |
need help! DAO + DataGridControl
![]() |
I've got a program similar to what u wanted.If u really want this send me a notification mail to me.My email id is :
choudhuryshouvik@gmail.com
choudhuryshouvik@gmail.com
•
•
•
•
I've got a program similar to what u wanted.If u really want this send me a notification mail to me.My email id is :
choudhuryshouvik@gmail.com
INSTRUCTIONS ON CONFIGURATION:-
I donot have oracle installed on my computer. I did this on a sql server database. So before try to run this code u need to configure the controls and do some tasks. Here are the instructions. Just follow these steps :-
1.start oracle
2.create a table with name "information" having the following two fields :-
rollno int, name varchar(25)
3.open vb and create a new standard.exe project
4.take two labels,two textboxes,one button,one datagrid control and one adodc control
5.name the controls as follows :-
text1->txtroll
text2->txtname
commnad button->cmdadd
6.add captions to the labels as Rollno and Name respectively.
7.right click on adodc1->properties->on first page select use connection string->build->click provider tab and select microsoft oledb provider for oracle->next->enter username and passwd->click test connection(if it displays test connection succeded then ur connection has done)->click ok->goto authentication tab->enter username and passwd->goto recordsource tab->select 2-adcmdtable from commandtype->select the table "information" from the table dropdown list->click ok. After this ur adodc configuration will complete.
8.select datagrid control->press f4->select datasource properety and change it to adodc1 or whatever ur control name will be->right click on datagrid control6.0->select retrieve fields->click yes->right click again->select properties->enter a caption->goto columns tab->change captions of the fields to whatever u want to be displayed->click ok. After this ur datagrid configuration will complete
9.now paste the following code into ur form module
10.make sure oracle is still running and then run & compile the source code.
If u still got any problems u can mail me or post it here.(I prefer mailing)
Here is the source code :-
Option Explicit
Private Sub cmdadd_Click()
If Trim(txtname.Text) <> "" And Trim(txtroll.Text) <> "" Then
With Adodc1.Recordset
.AddNew
![rollno] = Trim(txtroll.Text)
![Name] = Trim(txtname.Text)
.Update
End With
Adodc1.Refresh
MsgBox "Database updated."
txtname.Text = ""
txtroll.Text = ""
txtroll.SetFocus
Else
MsgBox "Plz insert some information first.", vbApplicationModal + vbExclamation, "Blank data"
txtroll.SetFocus
End If
End Sub
Private Sub Form_Load()
Adodc1.RecordSource = "information"
Adodc1.Refresh
End Sub
![]() |
Similar Threads
- VB: Connect to Access database via ODBC datasource name (Visual Basic 4 / 5 / 6)
- Create tables in access database by DAO liberary (Visual Basic 4 / 5 / 6)
- ADODB Y DAO together ? (Visual Basic 4 / 5 / 6)
- need help with MFC access to DAO database problem (C++)
- How to Show Database In DataGrid Using DAO (Visual Basic 4 / 5 / 6)
- Record Locking in VB through DAO via MS Access (Visual Basic 4 / 5 / 6)
Other Threads in the Visual Basic 4 / 5 / 6 Forum
- Previous Thread: Urgently need help in getting Autonumbering ID. Thanks Alot.
- Next Thread: Adding data to a newly created field
| Thread Tools | Search this Thread |
* 6 429 2007 access activex add age application basic beginner birth bmp calculator cd cells.find click client code college component connection connectionproblemusingvb6usingoledb copy creat ctrl+f data database datareport date delete dissertations dissertationthesis dissertationtopic edit error excel excelmacro file filename form hardware header iamthwee image inboxinvb internetfiledownload keypress label listbox listview liveperson login looping machine microsoft movingranges number objectinsert open oracle password prime program prompt range-objects readfile reading record refresh remotesqlserverdatabase report save search sendbyte sites sort sql sql2008 sqlserver subroutine tags textbox time urldownloadtofile vb vb6 vb6.0 vba visual visualbasic visualbasic6 web window windows





