Search results for query: *

Hello, I've a form that when the user clicks on a button opens a new form with a treeview with data for the user to select. After the user selects the data and clicks OK button I want to pass the value of the row selected to a field from the first form. I'm using a variable to put the value of...

I've a treeview on my form that as a Parent node "Familia" and a child node "Ocorrencias". Here's the code: Private Sub frmListaOcorrenciasTree_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim x, y As Integer Dim NomeFamilia...

Hi, I've the following code used to update a record on my Access database: con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=""C:\Programaçao\Visual Basic\Inapal\ReportIt\ReportIt.mdb"";" con.Open() sSQL = "SELECT * FROM [Utilizadores] WHERE (User= '" & Utilizador &...

Hello, I'me trying to select the records that are on the database with the field 'Data" between two dates that are inserted into two fields: "DeData" and "aData". I've the following code but I'm getting an error on my SQL statment: Private Sub DeData_ValueChanged(ByVal sender As System.Object...

Hello, I want to change the cursor type when the mouse goes over a certain column in a dataview. I've the following code: Private Sub DataGridView1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGridView1.MouseHover If DataGridView1.CurrentCell.ColumnIndex...

Hello, I need to display on a form, on a textbox, the value of a sum of records that is on a Query on my database. I've the following code: con2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=""C:\Programaçao\Visual Basic\Inapal\ReportIt\ReportIt.mdb"";" con2.Open()...

Hello, I've a DataGrid on a form and I need to change the cursor from Default to Help when a user moves the mouse over a certain column of the DataGrid. I've the following code but is not working: Private Sub DataGridView1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles...

Hello, I've a DataGridView on a form and I need to catch the mouse click event on a specific cell so that I can display more information about the value showned. For other words, if a user clicks on a certain cell of the datagrid, I want to open a new dialog form to show more information about...

Hello, I've the following code to search a record in the database: Public Class LoginForm1 Dim da As OleDb.OleDbDataAdapter Dim ds As New DataSet Dim con As New OleDb.OleDbConnection Dim sSQL As String Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)...

Hello, I've the following code to insert a record into an MS Access database when clicking on Button1: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data...

I'm new to VB 2005. I've programmed for a while in VB 6 mas now that I started with VB 2005 I've been a little lost! I've the following code to add a new record to an MS Access database: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles...

I've a combo box on a form that is binded to an Access table. For instance, lets say the combo displays "White", "Yellow", "Red" (on this order) I open the drop down list and I select "Red". When I open the drop down list again, the combo displays ""Red", "Yellow" and "Red"! What can be the...

Hello, Does annyone uses on their site or blog ads from Google Adsense? I would like to know how has been your experience with this system. Thanks in advance, João Pinto www.1000headlines.com

I've the following code: <% Dim cnnSimple ' ADO connection Dim rstSimple ' ADO recordset Dim strDBPath ' path to our Access database (*.mdb) file Dim MySQL Dim source strDBPath = Server.MapPath("db/rssdb.mdb") Set cnnSimple = Server.CreateObject("ADODB.Connection") cnnSimple.Open...

Hello, I've a module with the following code: Public Sub close_form(option As String) Dim frm As Form For Each frm In Forms If (frm.Name <> option) And (frm.Name <> "Startup") Then Unload frm End If Next End Sub This is used when a user clicks on a button at the Startup...

Hello, I've the following code: TotalVendaTable.RecordSource = "SELECT * FROM Vendas WHERE ((Vendas.Data > '" & DeData & "' ) AND (Vendas.Data < '" & AData & "')) ORDER BY Vendas.Data ASC" TotalVendaTable.Refresh where I receive error nr. 3464: "Incorrect Data Type in criteria Expression"...

Hello, I've a recordset displayed on a Data grid. I'm trying to sum the values of a field so that I can have the total sum of the entire recordset displayed on a field. I've tryed the follow: VendaTable.Recordset.MoveFirst Do Until VendaTable.Recordset.EOF QtdTotal = QtdTotal +...

Hello, Probably this is very simple but I'm stuck here with this problem: On a form I've a text box with a value that I want to assign to a public variable so that I can use it in another form. I've made this: 1st form: refer = ReferenciaInput 2nd form: Public refer As String Private Sub...

Hello, I'm trying to design a report in VB 6 but I can't find the Data Environment. It doesn't appear in Project or in Project->Components->Designers. Can anyone help me please? Thanks, João Pinto

Hello, Can annyone tell me the best way of inputing currency values in €'s in a text box? I tryed the maskedit control but it doesn't accept €'s. Thanks, JP