You are like two versions behind. I know that 9.1 works fine on windows 7.

Dan Goldberg

From: MDRD 
Sent: Wednesday, January 04, 2012 1:15 PM
To: RBASE-L Mailing List 
Subject: [RBASE-L] - RE: Win 7 problem
I tested a compiled version using the 3/5/10 version of 7.6 and it works fine, 
so the problem seems to be the current build I have with Win 7... very Strange, 
leave it to me to start off the new year like this LOL

Marc


From: MDRD 
Sent: Wednesday, January 04, 2012 1:58 PM
To: RBASE-L Mailing List 
Subject: [RBASE-L] - RE: Win 7 problem

Thanks Tony

Whey I cut and pasted the email I lost all my formatting and spacing.  The code 
below Return is the code that pops up after the Browse command, and is not in 
the EEP.  Strange.

I found another problem that does not work in Win 7 but have not tracked it 
down yet, getting a new computer and loading everything sure takes lots of time.

Marc
BTW   Have you noticed the RETURN after ENDIF.
The routine will stop at that point

 

Tony

From: [email protected] [mailto:[email protected]] On Behalf Of MDRD
Sent: woensdag 4 januari 2012 20:12
To: RBASE-L Mailing List
Subject: [RBASE-L] - Win 7 problem

 

HI

 

I just moved my 7.6 app to a new Win 7 computer and now some blocks of code run 
differently. I am using Ver 7.6.11.31014, it is different then my old computer, 
I updated versions to get a new license to install this on the new computer.

This block of code use to work in Vista, if the Browse command failed the 
SQLCODE would be 100 and the Pause command would work. Now using Win7, no 
changes in the code the SQLCODE = 0 and I go to the bottom block of code, then 
it skips the IF SQLCODE = 100.

I have no earthly clue what to look for, 

Thanks

Marc


BROWSE USING aptnext +
WHERE (cust1 = .vcust1 OR cust2 = .vcust1 OR cust3 = .vcust1 +
OR cust4 = .vcust1) AND aptdate > .#DATE

IF SQLCODE = 100 THEN
PAUSE 1 USING 'Needs to make an Apt' CAPTION 'No APts set'
ENDIF
RETURN

SET VAR #NOW DATETIME = NULL
SET VAR Vcap1 TEXT = NULL
SET VAR RBTI_FORM_FORMNAME TEXT = NULL
return

 

 

Reply via email to