excel vba - Vba code to Check file is the readonly -

-

please advise how check if file ready before opening it...

below code used open file...

myfilenamedir = "h:\shaikh_gaus\scratch\vba\book16.xlsx" workbooks.open filename:=myfilenamedir, updatelinks:=0  set ws1 = worksheets("students")

ways check or change attributes:

option explicit  sub testfileattributes()      const file_name string = "c:\test.txt"      if isreadonly(file_name) msgbox "file read-only"      if isopenasreadonly msgbox "file open read-only"      makereadwrite file_name      if not isreadonly(file_name) msgbox "file not read-only"  end sub

.

public function isreadonly(byval fname string) boolean      'vbnormal = 0, vbreadonly = 1, vbhidden = 2, vbdirectory = 16      if len(fname) > 0 isreadonly = getattr(fname) , vbreadonly  end function

.

public function isopenasreadonly(optional byref wb workbook = nothing) boolean      if wb nothing set wb = activeworkbook      isopenasreadonly = wb.readonly 'opened read-only within microsoft excel  end function

.

public sub makereadwrite(byval fname string)      const read_only = 1      dim fso object, fsofile object      set fso = createobject("scripting.filesystemobject")     set fsofile = fso.getfile(fname)      fsofile         if .attributes , read_only .attributes = .attributes xor read_only     end end sub

Comments

Post a Comment

Popular posts from this blog

yii2 - Yii 2 Running a Cron in the basic template -

-
i have seen instructions on running cron in advanced template, cant figure out how on basic template. have following controller in basic controllers folder. <?php namespace app\controllers; use yii\console\controller; /** * cron controller */ class croncontroller extends controller { public function actionindex() { echo "cron service runnning"; } public function actionmail($to) { echo "sending mail " . $to; } } i have navigated root of application , tried these comands yii cron php yii cron im getting unknown comand "cron" i know old question failed find actual answer this. if @ code yii exec file you'll notice requires /common/config/aliases.php file console/config/main.php. can naturally change these or copy on these advanced template. hope solves problem wanting same thing.
Read more

asp.net - 'System.Web.HttpContext' does not contain a definition for 'GetOwinContext' Mystery -

-
i realize question might seem trivial some, it's these types of things find myself fighting quite bit , want make sense of despite seeming losing battle in .net (for me anyway). so, if following: using system.web; ... applicationuser user = system.web.httpcontext.getowincontext().getusermanager<applicationusermanager>().findbyid(system.web.httpcontext.user.identity.getuserid()); that produces error in title , red getowincontext() , error cannot resolve symbol 'getowincontext()' however, if following (remove system.web in front of httpcontext ), works expected (or @ least no errors): using system.web; ... applicationuser user = httpcontext.getowincontext().getusermanager<applicationusermanager>().findbyid(system.web.httpcontext.user.identity.getuserid()); however, if (same line that's working using system.web commented out): //using system.web; ... applicationuser user = httpcontext.getowincontext().getusermana...
Read more

mercurial graft feature, can it copy? -

-
there new feature in mercurial 3, called 'graft' (graft local). job of moving change-set different branch. is there way "copy" change-set branch? i interested in in moving stuff qa branch production branch, still need code reside in qa. want copy. found , have tried few things, maybe it'll become clear more tinkering , reading... does have better way of 'cherry picking' change-sets move cross branch (or trunk)??? graft copies changesets, doesn't move them. hg graft (emphasis mine): this command uses mercurial's merge logic copy individual changes other branches without merging branches in history graph. known 'backporting' or 'cherry-picking' . default, graft copy user, date, , description source changesets.
Read more