-
and it runned after coding but a error is coming
"Compiler Error Message: BC30002: Type 'MySqlConnection' is not defined"
can u pl help me?
">i had installed "mysql, mysqladministrator, mysql connector.net and it runned after coding but a error is coming "Compiler Error Message: BC30002: Type 'MySqlConnection' is not defined"can u pl help me?
-
-
-
-
-
-
-
Dim l As Integer
l = Val(InputBox("Enter the suppliers Number to Edit", "Edit Suppliers"))
Rela = "Select * from suppliers where supplier_No =" & l & ""
getdata Rela
If Plot.RecordCount = 0 Then
MsgBox "Record Not Found", vbInformation, "Supplier"
ElseIf Plot.RecordCount > 0 Then
Call getsuppliers
MsgBox "Record Found", vbInformation, "Supplier"
loadlv2
End If
End Sub
**************************************************************
Private Sub cmdDelete_Click()
Dim x As Variant
Dim f As Integer
If MsgBox("Are you sure You Want to Delete This Record", vbYesNo, "Delete File") = vbYes Then
For f = 1 To ListView1.ListItems.Count
If ListView1.ListItems(f).Checked = True Then
x = ListView1.SelectedItem.Text
Relationship.Execute "delete * from Customer where Cust_No = " & x & ""
End If
Next f
MsgBox "Record has been deleted", vbCritical, "Delete.."
End If
End Sub
*****************************************************************
Public Relationship As DAO.Database
Public Plot As DAO.Recordset
Public Rela As String
Public Sub opendb()
Set Relationship = OpenDatabase(App.Path + "\Relationship.mdb")
End Sub
Public Sub getdata(ByVal source As String)
opendb
Set Plot = Relationship.OpenRecordset(source)
End Sub
Public Sub save(ByVal str As String)
opendb
Relationship.Execute str
End Sub
">I have small application that i was developing as a school evaluation project,but i have faced problems.(i.e) My command buttons are not perfoming the tasks as expected Edit, and Delete buttons they search and delete the first records on the database. A sample of the commands is as below i am using Using DAO in a module and listviews to display the records.Please helpPrivate Sub cmdEditer_Click()cmdsaved.Caption = "Update"Dim l As Integerl = Val(InputBox("Enter the suppliers Number to Edit", "Edit Suppliers"))Rela = "Select * from suppliers where supplier_No =" & l & ""getdata RelaIf Plot.RecordCount = 0 ThenMsgBox "Record Not Found", vbInformation, "Supplier"ElseIf Plot.RecordCount > 0 ThenCall getsuppliersMsgBox "Record Found", vbInformation, "Supplier"loadlv2End IfEnd Sub**************************************************************Private Sub cmdDelete_Click()Dim x As VariantDim f As IntegerIf MsgBox("Are you sure You Want to Delete This Record", vbYesNo, "Delete File") = vbYes ThenFor f = 1 To ListView1.ListItems.CountIf ListView1.ListItems(f).Checked = True Thenx = ListView1.SelectedItem.TextRelationship.Execute "delete * from Customer where Cust_No = " & x & ""End IfNext fMsgBox "Record has been deleted", vbCritical, "Delete.."End IfEnd Sub*****************************************************************Public Relationship As DAO.DatabasePublic Plot As DAO.RecordsetPublic Rela As StringPublic Sub opendb()Set Relationship = OpenDatabase(App.Path + "\Relationship.mdb")End SubPublic Sub getdata(ByVal source As String)opendbSet Plot = Relationship.OpenRecordset(source)End SubPublic Sub save(ByVal str As String)opendbRelationship.Execute strEnd Sub
-
-
-
-
-
-
-
What are the important difference between property clause and visual attributes?
Named visual attributes differ only font, color & pattern attributes, property clauses can contain this and any other properties. You can change the appearance of objects at run time by changing the named visual attributes programmatically , property clause assignments cannot be changed programmatically. ...
-
Explain about content canvas views?
Most Canvas views are content canvas views a content canvas view is the "base" view that occupies the entire content pane of the window in which it is displayed.
-
Explain about stacked canvas views?
Stacked canvas view is displayed in a window on top of, or "stacked" on the content canvas view assigned to that same window. Stacked canvas views obscure some part of the underlying content canvas view, and or often shown and hidden programmatically.
-
Explain about horizontal, Vertical tool bar canvas views?
Tool bar canvas views are used to create tool bars for individual windows. Horizontal tool bars are display at the top of a window, just under its menu bar. Vertical Tool bars are displayed along the left side of a window
-
How can a group in a cross products be visually distinguished from a group that does not form a cross product?
A group that forms part of a cross product will have a thicker border.
-
Oracle Concepts Interview Questions
Ans