General information
Category:
Source Safe Control
I downloaded this prg from somewhere which I run in a a macro...
CTRL O ...
***********openproj
LPARAMETERS ccProject
IF PARA()=0
ccProject= "d:\solivpdm.ora\solivpdm.pjx"
ENDIF
local llAbort, lnProjectCount, lnCount
llAbort = .f.
lnProjectCount = application.projects.count
for lnCount = 1 to lnProjectCount
if ccProject $ LOWER(application.projects.item(lnCount).name)
llAbort = .t.
endif
endfor
if !llAbort
use (ccProject)
IF ALIAS()!=""
replace all user with iif(local,"Y","N")
replace all local with .t.
use
modify project (ccProject) nowait
use (ccProject) again shared
replace all local with user=="Y"
use
ENDIF
endif
*****************************
Also if you are running a virus program disable it...
I.E. macafee, norton antivirus...
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only