Posts by abu taher

I select a month from a combobox and type the year in maskeditbox then press a button to show the report. 1st the report show. when I select another month to show again the report then show a error msg:

run-time error 3705
operation is not allowed when the object is open

and then highlight the connection string.

if you want only 4 digit will type in text box then adjust the properties of text box. max length = 4

you can do one thing. system restore. I don't know you get benifit from it. but try it from Accessories>system tools>system restore. from here you can go back before that date when you did it.

I don't know more. have any option in that software to recover hidden file? another thing check in the show hidden file from the folder option and then recrove by your software.

plz clear and details. I don't understand what you said.

I think if you install new windows with out format then solve your problem little bit. another thing: with boot cd you can copy your neceessary thing.

for search, plz check it.

bob you are right. but I try to said a tips.

plz read it. http://www.daniweb.com/forums/thread164775.html

that is being recognized by windows Xp

???????ok. you can check it another computer with win vista operating system.

what kind of software you use? have this software any option to recover hidden file? another thing show the hidden file check in.

extarnal disk mean? if you delete it and do any work after delete I think you can not recover it.

some time it happened. I think if you install or repair your windows then it will be solve.

some time it happened. some virus are distrub to install antivirus. one suggestion: 1st you format your windows drive. and then install new windows. when it finished. then at 1st istall the antivirus. no other work you can not do before after finish windows setup. then scan with your anti virus.

one more thing if you want to install both of two windows then you can install it two diffrent drvie.

its not php. it made by vb6.

have you any problem more? if not please solve it.

plz check it with more.

after complete all process when I press finish then show a msg: "unexpected error number 70 has occured: permission dinied."
what I need to do.

no divice found. its mean easy. connection error or divice damage. some thing you think with your own memory cause it is easy. it help your memory and upgrade you.

I know some software can get back it. but some rules. after delete some thing you cann't do any work. cause the file save in ram. so they can restore it. but if do any work maximum time its not resotre.

one more thing if the my computer is not in start button. plz check: right click on taskbar>properties>startmenu(tab)>click startmenu>customized>advance(tab). check start menu Item. see my computer>display as a link. apply.

you can use software. folder guard or ohter. if your partition is NTFS format then you can use windows default option.

if I write 500 in a textbox then a label.caption show "Profit". If I write -500 the the label.caption show Loss. I write code

If Format(Text1, "0000000") Then Label1.Caption = "Profit"

but for -500 what I need to write?

plz modify this and help me.

add a dataenvironment and a datareport. connect the database with dataenvironment and connect the datareport with dataenvironment. and then design the datareport.

I have two dtpicker. here I want I select two date from dtpicker and the total sum of amount will show in two diffrent textbox. like: I have two field, expense and income. the total amount of expenses will show in a textbox by selected date and other textbox show income. how I do it?

is it possible to do?

Private Sub Form_Load()
On Error Resume Next
SetAttr (App.path & "\Company.mdb"), vbNormal
Set db1 = OpenDatabase(App.path & "\Company.mdb")
Set User = db1.OpenRecordset("Select * From User")
End Sub

Private Sub ok_Click()
On Error Resume Next
If txtlogin.Text = "" Or txtpass.Text = "" Then
    MsgBox "Please Enter Correct User ID.", vbInformation
    txtlogin.SetFocus
    Exit Sub
End If
User.FindFirst "UserID='" & Trim(txtlogin.Text) & "' and UserPass='" & Trim(txtpass.Text) & "'"
If User.NoMatch Then
    MsgBox "Please Enter Correct User Password.", vbInformation
    txtpass.SetFocus
    Exit Sub
Else
  Set User = db.OpenRecordset("Select * From User")
  If User.RecordCount <> 0 Then User.MoveFirst
    Do While Not User.EOF = True
      If UCase(User!UserID) = UCase(Trim(txtlogin.Text)) Then
          If User!Login <> 0 Then
            RA = User!RA: RM = User!RM: RD = User!RD
            RP = User!RP: RR = User!RR: RT = User!RT
            UType = User!Type: UserID = User!UserID: Usr = User!Sno
            Unload Login: Menu.Show: Exit Sub
          Else
            MsgBox "Permission Denided. Please contact your Administrator.", vbCritical + vbOKOnly, "Permission"
            End
          End If
      End If
      User.MoveNext
    Loop
End If
End Sub

here I use my code. you can modify with some change, like table name etc.

I remove some control and code. now it is ok.

Hai Vinith! I watched ur prgm. I need some suggestion for my project. Can u help me. The theme of my project is to making Diary writing as Computerized. Entering the day to day memories & save it with password protection. I've to store the information in the backend MSAccess. Can u help me to finish my project... Please reply soonly...

I think you need to open a new thread.

plz any body modifiy it. here function4 will show the diffrence. but how?

plz check it.

ok try to check it.

my form name is mreport. no problem with from & form. i write it just like an example. I have many button to show many form. all are ok. but only this form made problem. when I press a button to show then show this msg. when I press ok. then the form show. but no problem happend.

now I remove all code. but when I press that button to show other form then show this msg. in the button the code is " mreport.show". if I press ctrl + break then hightlight end sub.

not work. now if i press ctrl then highlight End Sub

when I press a button to open another from. then show this msg.

in my data report I have two rptfunction. both of them show the total sum. here I want 1 extra rptfuncion show the calculate amount. I mean it show (1st rptfunction - 2nd rptfunction). like: 1st rpt...2000 and 2nd rpt....1500. so the 3rd rpt... show 500. and one more thing if it show 500 the a label. caption show profit. if it show -500 then it show loss.

plz check it.

install service pack 6 for vb6.

i reinstall it but not solve.

try to search in web. and see it.http://www.daniweb.com/forums/thread214396.html

I don't know. but you can protect it by password. then if any body copy it then he can't work with it.

my stand by option not work. I mean it enable flase. how I repair it. I install a new windows xp, service pack 2.

just check your hard drive connection. check your windows. and also check your hard drive.

did you connect it by properties or code? try to use code for better result.

plz check it.

you can check every thing in other pc of your any friend. then you can find out what was corrupted.

just click on the mark thread as solved. below of the page blue font.