Recent content by Imhoteb

If TypeOf Ctrl Is TextBox Then Ctrl.BackColor = vbRed End If

No, you can make the connection directly to de mdb file

Dim Ctrl As Control For Each Ctrl In Me If Me.Check64 = True Then Ctrl.BackColor = vbRed End If Next

Another method to avoid this problem is the following rs.FindFirst "[Name] = '" & Replace(Me![Combo82],"'","''") & "'"

Replace("000 000 000 000"," ","")

Sorry, You wrote that it is an access 2000 database. I noticed it to late

if this is an access97 database I can find the password if you send me the database speedeetje@hotmail.com

The ADODC is a datacontrol which is added in the menu Project==>Components... There you will see that Microsoft ADO Data Control 6.0 (SP4)(OLEDB) is a selected item. That is the component you have added

I thought I pointed you in the right direction. If you use the code I posted here before you should be able to connect to your database. After the connection is made you can drop your own code and do whatever you are doing in your application. **********************Begin...

You are using ADO what I mostly do to connect to a database is the following. I create a module with all the parameters to connect to the database Put the following code in a module ****************************************************** Option Explicit Public myConn As New ADODB.Connection...

The solution I suggested here before uses a report created with crystal reports. You can find crystal reports on the third CD from VB 6.0. If you install this program you will be able to create a report with crystal reports (version 4.6)and open this report in VB when putting the crystal report...

Are you using an access database? If you are you can connect using ado like this Put this in a module Option Explicit Public myConn As New ADODB.Connection Public RS As New ADODB.Recordset Dim Cmd As New ADODB.Command Public Sub CloseConn() RS.Close myConn.Close End Sub Public Sub...

Hi, Indeed in my code there is an error txtNumber should be Text1 It has to be changed twice

Hi, Could you try this please Maybe it is not the fasted way but it works Put two textboxes and a commandbutton on a form. In textbox1(Text1) you put your number'A000000001' Textbox 2 (Text2) will give you the result even when the numberhas more than 1 digit. You will also see that, when you...

Hi, You can control the length of the ID_order. Select Case Len(id_order) Case 1 id_order= "000" & id_order Case 2 id_order= "00" & id_order Case 3 id_order= "0" & id_order Case 4 id_order= id_order End Select ydate...