World: r3wp

It isn't a protocol yet but rather has a module/function API. ODBC 
database access is working for me as a Windows only host kit extension, 
with UTF8 strings and bound parameters. I'm in code cleaning stage 
and I'm about to support SQLTables and SQLColumns catalogue API functions. 
Sadly, it won't be possible to use it with DATE! values for long 
(see curecode). And, yes, I'm thinking on supporting some ODBC errors 
in their own error category. There are no best practices known to 
me on how to do that, though.

Any example of how rebol can talk to MS Outlook?

Write an email to it? :)

At least that. Close.

If Outlook as a COM interface, you can use that

it does and works using Aton's com lib

Thanks. Found this: http://anton.wildit.net.au/rebol/os/windows/COMLib/

If you need it to be robust, and talk to mtuliple versions of Outlook 
(e.g. used by others who may have a different version), consider 
using Redemption. It is robust and well worth the money IMO.

The above lib fails. Next, Redemption.

I know that a companny has built a full integration to outlook supporting 
more than a single version of outlook... AFAIK they used Anton's 
com lib .

florin, it might just be a config issue.   did you get the comlib 
to do anything within excel?  IIRC Anton's comlib has a few examples 
for excel and word.  getting that to work first will make outlook 
attempts a bit easier.

actually the integration was for an exchange server, but it goes 
through outlook IIRC.

(Did they really? -- Gosh...)

Would COMLib allow me to mess with internet explora...for example: 
insert urls into the address bar to change the website viewed without 
having to open another tab or window?

in theory yes.

Dumb question: How is it that I solve this?

>> set to-word "a" 2
** Script error: a word is not bound to a context
** Where: set
** Near: set to-word "a" 2

There's probably some easier way than this, I hope:

>> x: 1
== 1
>> set bind to word! "a" 'x 2
== 2
>> a
== 2

ok, thanks

wow rebol has become perharps a bit too picking about binding?

did someone forget that REBOL is supposed to be "simple" ?

picking = picky

LOAD loads and binds strings except being told otherwise with /UNBOUND:

>> set load "a" 2
== 2
>> set load/unbound "a" 2
** Script error: a word is not bound to a context
** Where: set
** Near: set load/unbound "a" 6

I don't think it's especially picky the way this is.

I understand how it is... its just that in R2 to-word bound things 
to "global" context by default.

because we now have unbind and generally much more control over the 
binding, I would have thought that auto-binding to user context wouldn't 
be such a big issue.

it used to be an issue because we could not unbind.

May I withdraw my suggestion? Don't use is in tight loops:

>> dt [loop 100000 [set load "a" 2]]
== 0:00:02.017813

>> dt [loop 100000 [set bind to word! "a" 's 2]]
== 0:00:00.079424

hehe

;-)

well, then there has to be a better way to do that. some kind of 
default-bind.

I just discoverd this func...    

utf?

in some fonts the u looks like a w... hehehe

set bind/new to word! "a" self 2
or
set bind/new to word! "a" system/contexts/user 2

Max, it's a dialect: 'ut th' fu'?

Though perhaps we could have a WTF? error-related func.

A refinement for SET might be very handy for the unbound scenario, 
and BrianH may chime in with the design logic to help clarify.

yes.... wtf? as a small undocumented easter egg could be a nice little 
rebol detail   :-D   

basically it could be an alias for why?

Maybe combined with a stack dump? That is, when you say WTF? you 
need all the help you can get. And the refinement for even more info 
would be /!. ;-)

we should find refinements for:

WTF?/$/!/@/*/

;-)

hmm... refinements are case sensitive?

>> txt
== [Errors: 0 Warnings: 0 Outputs: 1 Skipped: 0]

txt/errors
== 0

txt/Errors
== none

That is very strange and makes me wonder why I haven't been tripped 
by this BTW, you're talking path notation here not refinements. With 
function refinements it seems to work as expected.

>> test: func [/a] [all [a 'a]]
>> test/a
== a

>> test/A
== a

>> test: [a 1 A 2]
== [a 1 A 2]

>> test/a
== 1

>> test/A
== none


This is dowright unexpected, I'd consider it a bug, what do you think? 
You'd better curecode this, I guess.

probably never tripped by it because no one uses upper case refinements!

Looks like no one has posted this to curecode yet

MAx: "did someone forget that REBOL is supposed to be "simple" ?"

Did you miss this blog:  http://www.rebol.com/article/0374.html

Simplicity is a thing of the past.

hehe

I thought that was not a good post myself ...

People use things at different levels of expertise ... and if there 
are enough experts around to critique their work, they will get better. 
 So, the differing programming styles seen are a reflection of Rebol's 
failure.

Simple things should still be simple.

And complex things are complex

As long as they're possible. :-)

is there a function to recursively delete a directory? I should probably 
have asked before I wrote one. :-)

Otherwise, here is one, feel free to optimize:

delete-dir: func [dir /only criteria] [
	dir: clean-path dir
	foreach file read dir [
		if any [not only do func [file] criteria file] [
			file: dir/:file
			if dir? file [delete-dir file]
			delete file
		]
	]
]