Tip: Projects & BlackBox

From: Treutwein Bernhard <"Treutwein>
Date: Wed, 28 Apr 2004 13:42:16 +0200

----boundary-LibPST-iamunique-940371615_-_-
Content-type: text/plain

Dear BlackBox users,

A little known feature of BlackBox is the ability to use the
installation directory in read-only mode and have different
projects under different directories. This allows for
project specific configuration of the global menus etc.
This feature is hidden under "Server installation (Windows only)"
in "System/Docu/User-Man.odc". The only drawback is that you
have to modify the way you call BlackBox for different projects.

Enclosed is a little Visual-Basic script, which allows all
projects to be stored under some root path (H:\BlackBox in
my case) and to choose from this menu a project folder.
It then switches the current directory to this path (with
the result that File->Open offers you your project path)
and appends the /use path to the BlackBox command line.

For those of you, who have disabled the automatic (double
click) execution of VBS for security reasons, a tiny
BlackBox.cmd is included.

regards

--
	Bernhard Treutwein
	Bernhard.Treutwein(at)verwaltung uni-muenchen de (work)
	BdT(at)wildwein de (home)
------------------------------------------------------------ browse.vbs ----
' Author: Bernhard Treutwein BdT(at)wildwein de
' based on a hotline answer of the german computer magazin c't, issue 9/2004,
p. 184
' original script and copyright available at:
ftp://ftp.heise.de/pub/ct/listings/0409-184.zip
' modified with help of the original author Hajo Schulz
[hajo.schulz{([at]})nowhere.xy' Last change: 28-Apr-2004
Option Explicit
Dim sh, app, fldr
Dim prg, arg, mypath, root
Dim i
Set sh = WScript.CreateObject("WScript.Shell")
Set app = Wscript.CreateObject("Shell.Application")
prg = "D:\Programme\BlackBox\BlackBox.exe"   ' Define prg as the full path
name of your BlackBox installation
root = "H:\BlackBox\"                        ' Define root as the full path
name of the root directory of your BlackBox Projects
set fldr = app.BrowseForFolder(0, "Please choose project folder" & CHR(10) &
CHR(10) & "Cancel uses Blackbox Program directory", 65, root)
If fldr Is nothing then ' Cancel pushed, use default
  mypath = ""
 Else
  mypath = fldr.Self.Path
End If
If mypath = "" Then
  sh.Run prg, 1, false
 Else
  sh.CurrentDirectory = mypath
  sh.Run prg & " " & "/use " & mypath, 1, false
End If
---------------------------------------------------------- blackbox.cmd ----
C:\WINDOWS\System32\WScript.exe "d:\Programme\blackbox\browse.vbs"
----------------------------------------------------------------------------
--------------------------------------------
To unsubscribe from this mailing list, send a message containing the word "unsubscribe" to:
   blackbox-request{([at]})nowhere.xyTo get a list of valid e-mail commands and instructions on their usage, send a message containing the word "help" to the above address.
Send any problem reports or questions related to this email list to the list owner at
   owner-blackbox{([at]})nowhere.xyCurrent posting policy:
a) To post you should use the same address by which you are subscribed to the mailing list. That way, the list server will recognize you as subscriber and forward your posting immediately, without creating any overhead.
b) If, for some reason, you cannot post from the address, by which you are subscribed, your message will be moderated to avoid spam. Please understand that moderation will often cause some delay, in particular over weekends or holydays.
----boundary-LibPST-iamunique-940371615_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIERlYXIgQmxhY2tCb3ggdXNlcnMsXHBhcg0KXHBh
cg0KQSBsaXR0bGUga25vd24gZmVhdHVyZSBvZiBCbGFja0JveCBpcyB0aGUgYWJpbGl0eSB0byB1
c2UgdGhlIFxwYXINCmluc3RhbGxhdGlvbiBkaXJlY3RvcnkgaW4gcmVhZC1vbmx5IG1vZGUgYW5k
IGhhdmUgZGlmZmVyZW50XHBhcg0KcHJvamVjdHMgdW5kZXIgZGlmZmVyZW50IGRpcmVjdG9yaWVz
LiBUaGlzIGFsbG93cyBmb3JccGFyDQpwcm9qZWN0IHNwZWNpZmljIGNvbmZpZ3VyYXRpb24gb2Yg
dGhlIGdsb2JhbCBtZW51cyBldGMuXHBhcg0KVGhpcyBmZWF0dXJlIGlzIGhpZGRlbiB1bmRlciAi
U2VydmVyIGluc3RhbGxhdGlvbiAoV2luZG93cyBvbmx5KSJccGFyDQppbiAiU3lzdGVtL0RvY3Uv
VXNlci1NYW4ub2RjIi4gVGhlIG9ubHkgZHJhd2JhY2sgaXMgdGhhdCB5b3VccGFyDQpoYXZlIHRv
IG1vZGlmeSB0aGUgd2F5IHlvdSBjYWxsIEJsYWNrQm94IGZvciBkaWZmZXJlbnQgcHJvamVjdHMu
XHBhcg0KXHBhcg0KRW5jbG9zZWQgaXMgYSBsaXR0bGUgVmlzdWFsLUJhc2ljIHNjcmlwdCwgd2hp
Y2ggYWxsb3dzIGFsbFxwYXINCnByb2plY3RzIHRvIGJlIHN0b3JlZCB1bmRlciBzb21lIHJvb3Qg
cGF0aCAoSDpcXEJsYWNrQm94IGluXHBhcg0KbXkgY2FzZSkgYW5kIHRvIGNob29zZSBmcm9tIHRo
aXMgbWVudSBhIHByb2plY3QgZm9sZGVyLlxwYXINCkl0IHRoZW4gc3dpdGNoZXMgdGhlIGN1cnJl
bnQgZGlyZWN0b3J5IHRvIHRoaXMgcGF0aCAod2l0aFxwYXINCnRoZSByZXN1bHQgdGhhdCBGaWxl
LT5PcGVuIG9mZmVycyB5b3UgeW91ciBwcm9qZWN0IHBhdGgpXHBhcg0KYW5kIGFwcGVuZHMgdGhl
IC91c2UgcGF0aCB0byB0aGUgQmxhY2tCb3ggY29tbWFuZCBsaW5lLlxwYXINClxwYXINCkZvciB0
aG9zZSBvZiB5b3UsIHdobyBoYXZlIGRpc2FibGVkIHRoZSBhdXRvbWF0aWMgKGRvdWJsZVxwYXIN
CmNsaWNrKSBleGVjdXRpb24gb2YgVkJTIGZvciBzZWN1cml0eSByZWFzb25zLCBhIHRpbnkgXHBh
cg0KQmxhY2tCb3guY21kIGlzIGluY2x1ZGVkLlxwYXINClxwYXINCnJlZ2FyZHNccGFyDQotLVxw
YXINClx0YWIgQmVybmhhcmQgVHJldXR3ZWluXHBhcg0KXHRhYiBCZXJuaGFyZC5UcmV1dHdlaW4o
YXQpdmVyd2FsdHVuZyB1bmktbXVlbmNoZW4gZGUgKHdvcmspXHBhcg0KXHRhYiBCZFQoYXQpd2ls
ZHdlaW4gZGUgKGhvbWUpXHBhcg0KLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tIGJyb3dzZS52YnMgLS0tLVxwYXINCicgQXV0aG9yOiBC
ZXJuaGFyZCBUcmV1dHdlaW4gQmRUKGF0KXdpbGR3ZWluIGRlXHBhcg0KJyBiYXNlZCBvbiBhIGhv
dGxpbmUgYW5zd2VyIG9mIHRoZSBnZXJtYW4gY29tcHV0ZXIgbWFnYXppbiBjJ3QsIGlzc3VlIDkv
MjAwNCxccGFyDQpwLiAxODRccGFyDQonIG9yaWdpbmFsIHNjcmlwdCBhbmQgY29weXJpZ2h0IGF2
YWlsYWJsZSBhdDpccGFyDQpmdHA6Ly9mdHAuaGVpc2UuZGUvcHViL2N0L2xpc3RpbmdzLzA0MDkt
MTg0LnppcFxwYXINCicgbW9kaWZpZWQgd2l0aCBoZWxwIG9mIHRoZSBvcmlnaW5hbCBhdXRob3Ig
SGFqbyBTY2h1bHpccGFyDQpbaGFqby5zY2h1bHpAaGVpc2UuZGVdXHBhcg0KJyBMYXN0IGNoYW5n
ZTogMjgtQXByLTIwMDRccGFyDQpccGFyDQpPcHRpb24gRXhwbGljaXRccGFyDQpEaW0gc2gsIGFw
cCwgZmxkclxwYXINCkRpbSBwcmcsIGFyZywgbXlwYXRoLCByb290XHBhcg0KRGltIGlccGFyDQpc
cGFyDQpTZXQgc2ggPSBXU2NyaXB0LkNyZWF0ZU9iamVjdCgiV1NjcmlwdC5TaGVsbCIpXHBhcg0K
U2V0IGFwcCA9IFdzY3JpcHQuQ3JlYXRlT2JqZWN0KCJTaGVsbC5BcHBsaWNhdGlvbiIpXHBhcg0K
XHBhcg0KXHBhcg0KcHJnID0gIkQ6XFxQcm9ncmFtbWVcXEJsYWNrQm94XFxCbGFja0JveC5leGUi
ICAgJyBEZWZpbmUgcHJnIGFzIHRoZSBmdWxsIHBhdGhccGFyDQpuYW1lIG9mIHlvdXIgQmxhY2tC
b3ggaW5zdGFsbGF0aW9uXHBhcg0Kcm9vdCA9ICJIOlxcQmxhY2tCb3hcXCIgICAgICAgICAgICAg
ICAgICAgICAgICAnIERlZmluZSByb290IGFzIHRoZSBmdWxsIHBhdGhccGFyDQpuYW1lIG9mIHRo
ZSByb290IGRpcmVjdG9yeSBvZiB5b3VyIEJsYWNrQm94IFByb2plY3RzXHBhcg0KXHBhcg0Kc2V0
IGZsZHIgPSBhcHAuQnJvd3NlRm9yRm9sZGVyKDAsICJQbGVhc2UgY2hvb3NlIHByb2plY3QgZm9s
ZGVyIiAmIENIUigxMCkgJlxwYXINCkNIUigxMCkgJiAiQ2FuY2VsIHVzZXMgQmxhY2tib3ggUHJv
Z3JhbSBkaXJlY3RvcnkiLCA2NSwgcm9vdClccGFyDQpJZiBmbGRyIElzIG5vdGhpbmcgdGhlbiAn
IENhbmNlbCBwdXNoZWQsIHVzZSBkZWZhdWx0XHBhcg0KICBteXBhdGggPSAiIlxwYXINCiBFbHNl
XHBhcg0KICBteXBhdGggPSBmbGRyLlNlbGYuUGF0aFxwYXINCkVuZCBJZlxwYXINClxwYXINCklm
IG15cGF0aCA9ICIiIFRoZW5ccGFyDQogIHNoLlJ1biBwcmcsIDEsIGZhbHNlXHBhcg0KIEVsc2Vc
cGFyDQogIHNoLkN1cnJlbnREaXJlY3RvcnkgPSBteXBhdGhccGFyDQogIHNoLlJ1biBwcmcgJiAi
ICIgJiAiL3VzZSAiICYgbXlwYXRoLCAxLCBmYWxzZVxwYXINCkVuZCBJZlxwYXINCi0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0gYmxhY2ti
b3guY21kIC0tLS1ccGFyDQpDOlxcV0lORE9XU1xcU3lzdGVtMzJcXFdTY3JpcHQuZXhlICJkOlxc
UHJvZ3JhbW1lXFxibGFja2JveFxcYnJvd3NlLnZicyJccGFyDQotLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
XHBhcg0KXHBhcg0KLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1c
cGFyDQpccGFyDQpUbyB1bnN1YnNjcmliZSBmcm9tIHRoaXMgbWFpbGluZyBsaXN0LCBzZW5kIGEg
bWVzc2FnZSBjb250YWluaW5nIHRoZSB3b3JkICJ1bnN1YnNjcmliZSIgdG86XHBhcg0KICAgYmxh
Y2tib3gtcmVxdWVzdEBvYmVyb24uY2hccGFyDQpccGFyDQpUbyBnZXQgYSBsaXN0IG9mIHZhbGlk
IGUtbWFpbCBjb21tYW5kcyBhbmQgaW5zdHJ1Y3Rpb25zIG9uIHRoZWlyIHVzYWdlLCBzZW5kIGEg
bWVzc2FnZSBjb250YWluaW5nIHRoZSB3b3JkICJoZWxwIiB0byB0aGUgYWJvdmUgYWRkcmVzcy5c
cGFyDQpccGFyDQpTZW5kIGFueSBwcm9ibGVtIHJlcG9ydHMgb3IgcXVlc3Rpb25zIHJlbGF0ZWQg
dG8gdGhpcyBlbWFpbCBsaXN0IHRvIHRoZSBsaXN0IG93bmVyIGF0XHBhcg0KICAgb3duZXItYmxh
Y2tib3hAb2Jlcm9uLmNoXHBhcg0KXHBhcg0KQ3VycmVudCBwb3N0aW5nIHBvbGljeTpccGFyDQpc
cGFyDQphKSBUbyBwb3N0IHlvdSBzaG91bGQgdXNlIHRoZSBzYW1lIGFkZHJlc3MgYnkgd2hpY2gg
eW91IGFyZSBzdWJzY3JpYmVkIHRvIHRoZSBtYWlsaW5nIGxpc3QuIFRoYXQgd2F5LCB0aGUgbGlz
dCBzZXJ2ZXIgd2lsbCByZWNvZ25pemUgeW91IGFzIHN1YnNjcmliZXIgYW5kIGZvcndhcmQgeW91
ciBwb3N0aW5nIGltbWVkaWF0ZWx5LCB3aXRob3V0IGNyZWF0aW5nIGFueSBvdmVyaGVhZC5ccGFy
DQpccGFyDQpiKSBJZiwgZm9yIHNvbWUgcmVhc29uLCB5b3UgY2Fubm90IHBvc3QgZnJvbSB0aGUg
YWRkcmVzcywgYnkgd2hpY2ggeW91IGFyZSBzdWJzY3JpYmVkLCB5b3VyIG1lc3NhZ2Ugd2lsbCBi
ZSBtb2RlcmF0ZWQgdG8gYXZvaWQgc3BhbS4gUGxlYXNlIHVuZGVyc3RhbmQgdGhhdCBtb2RlcmF0
aW9uIHdpbGwgb2Z0ZW4gY2F1c2Ugc29tZSBkZWxheSwgaW4gcGFydGljdWxhciBvdmVyIHdlZWtl
bmRzIG9yIGhvbHlkYXl9fQBrQm94XEJsYWNrQm8
----boundary-LibPST-iamunique-940371615_-_---

Received on Wed Apr 28 2004 - 13:42:16 UTC