By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
431,852 Members | 2,152 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 431,852 IT Pros & Developers. It's quick & easy.

MSHFlex Grid Control

P: 13
Hello VB experts

This is devi. i have one problem in MSHFlex Grid Control. I want to do repitative operations in this control. it means if i give 10 in column four the result of 10+1 will be displayed automatically in column five i want control structure format for this operation please help me.
Sep 4 '07 #1
Share this Question
Share on Google+
6 Replies


QVeen72
Expert 100+
P: 1,445
Hi,

Write a Function Like This : and call it whenever u Change/Update Column 4..

Expand|Select|Wrap|Line Numbers
  1. Grd.TextMatrix(Grd.Row,5) = Grd.TextMatrix(Grd.Row , 4) +1
  2.  
REgards
Veena
Sep 4 '07 #2

P: 13
Hi veena thanks i got result thank you very much and i want to learn about backup and recovery how i can use backup and recovery in my project?
Sep 4 '07 #3

QVeen72
Expert 100+
P: 1,445
Hi,

Back-Up and Recovery routines are Database Dependent, Can u tell which Backend DB u r using..?

REgards
Veena
Sep 4 '07 #4

P: 13
hi mam sorry for the late reply i use MS-Access Backend
Sep 4 '07 #5

P: 13
I want to learn about backup and recovery how i can use backup and recovery in my project?
Sep 4 '07 #6

QVeen72
Expert 100+
P: 1,445
Hi,

If MS-Access, then it's quite Simple, Copy the .mdb Access File using "FileCopy":
Check this :

For Back Up
Expand|Select|Wrap|Line Numbers
  1. If Dir("C:\BackUp\MyDB.mdb", vbDirectory) <> "" Then
  2.     'If Already Exisits then Delete It
  3.     Kill "C:\BackUp\MyDB.mdb"
  4. End If
  5. FileCopy App.Path & "\MyDB.mdb", "C:\BackUp\MyDB.mdb"
  6.  
For Restore :

Expand|Select|Wrap|Line Numbers
  1. If Dir("C:\BackUp\MyDB.mdb", vbDirectory) <> "" Then
  2.     If Dir(App.Path & "\MyDB.mdb", vbDirectory) <> "" Then
  3.         'Remove Current Working DB
  4.         Kill App.Path & "\MyDB.mdb"
  5.     End If
  6.     FileCopy "C:\BackUp\MyDB.mdb", App.Path & "\MyDB.mdb"
  7. Else
  8.      Msgbox "No Back Up Database Found"
  9.      Exit Sub
  10. End If
  11.  
Change this App.Path & "\MyDB.mdb" to ur Variable/Actual Database Name/Path Name

Note Before doing any Back-Up / Restore Operations u have to "Close All the Connections of the Database" in the Code. otherwise u cannot do the file copy...


REgards
Veena
Sep 4 '07 #7

Post your reply

Sign in to post your reply or Sign up for a free account.