Posts by abu taher

what kind of file u need to create? text file or other?

your syntax is correct. Actually what u need to know

please details about it.

what code u use for find.

any code u use for find? what that?

Please details

i made a project. i want to release it. but i want to release a trail version of it for 15 days. any proses. please help

i work with 3 more form. 2 form has no border. when i click a button a form is show. when i minimize main form the other form still show. but i want when i minimized main form all from will minimize what was open.

not that. I mean, from my project i create a new file. like.... File(menu)>new. now i work with a access file. but i want, from my project i want to create the same file. the access file contain name, address, other. I mean when i click file> new (from my project) the project automatic create the same file.

copied mean.......

use if end if or case statement.
if check1.value = 1 then
text1.text = hi
else
text1.text= ""
end if

what problem with if end if or case statement

I make a project with a access file with back up. But I want to create same file from my project. I mean when I need i make the same file from my project. help me

Private Sub mnufind_Click()
Dim a As String
Dim b As String

a = InputBox("Enter name or first few letters what you want to find: ", "Find")
If Len(a) = 0 Then Exit Sub
b = "Name Like """ & a & "*"""
Data1.Recordset.FindNext b
If Data1.Recordset.NoMatch Then
MsgBox "No record found", vbExclamation, "Phone Book"
End If
Exit Sub

End Sub

please details about INNO Set Up

its not work.

to sort your data please change sort property. set true.

i put a image box with a image. my screen resulation is 800 * 600. but when i change it to 1024 * 768 the image show small. i want the image will change with the change of screen resuation. help me

U need service pack 6 for visual basic. then u can use ms access 2003 in vb6. download it from here

Private Sub cmdfind_Click()
Dim a As String
Dim b As String


a = text1.text 'employee number
If Len(a) = 0 Then Exit Sub
b = "Employee Number Like """ & a & "*"""
Data1.Recordset.FindNext b
If Data1.Recordset.NoMatch Then
MsgBox "No record found", vbExclamation
end If
Exit Sub

I know microsoft release service pack 3 for window xp. you mean service pack 6 for visual basic 6.0. where i get it please

I dont understand your soluation. please details. and help me

use 0 for unhide

use component. then select microsoft flexgrid control 6.0. add a data control and flexgrid in your project. set data 1 properties.(database name) and flexgrid properties (data source). now run your project data will show in flexgrid

how i unhide my drive. now my drive d is hide. so please help me

you say i update my windows? i use service pack 2. I dont understand what u mean. please details.

i using acsess 2003 or xp. but when i click in record source property to show the table a massage was shown. but when i use office 97 then there was no problem

yes only condition is input. now i write like Name (fieldname) = taher (condition) but i only input taher (condition)

I only write, what i want to find. not critera. but now i write "Fieldname = condition" but i want only condition

I use data control to link access file by data properties not code. use simple code like move next etc. I use find next to find data. but when i want to find i write the criteria like Name = taher. But i want I write only taher in find text box.