🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.vdbase.forms
Article #76

Re: Internet link

#76
From: Peter van Mierlo
Date: Fri, 16 Apr 1999 00:00
53 lines
2275 bytes
Geoff S. Wass ( dBVIPS ) wrote:

> Peter,
>
> You can modify this to handle either. This is by Romain Streiff.
>
> /* ----------------------------------------------------------------
>        OpenURL -- opens a browser with the URL you pass to it.
>        Posted by Romain Strieff on the VdBASE Newsgroups
>
>    ----------------------------------------------------------------
> */
>    function OpenURL( cURL )
>       if type( "ShellExecute" ) # "FP"
>          extern cHandle ShellExecute( cHandle, cString, cString, ;
>                 cString, cString, cINT ) shell32 ;
>                 from "ShellExecuteA"
>       endif
>
>       ShellExecute( 0, "open", cURL, null, null, 1 )
>
> (This is the VdBASE 7 version -- if you are using VdBASE 5.x, remove
> the "32" from "shell" and the "A" from "ShellExecuteA").
>
> By the way, this news group is dead. You should post all questions in
> the NEW news groups hosted by dBASE Inc. Below my signature is a link
> to
> their news server.
>

Geoff,

I used this procedure and it works, but I only got it working on the
command prompt when
I'm using this syntax : OpenUrl("http://www.novell.com")

I'm looking for a way I could use a value from a field which is on the
form to connect to
the internet. I have used the following syntax but I don't get it
working:

* The form contains the entryfield NetHTTP where the internet page is
stored, so :
* I declare the value form Form.Entryfield_NetHTTP to the var. cURL
cURL=Form.Entryfield_NetHTTP.Value
OpenUrl(cURL)

VDB will now display the message 'Datatype mismatch: Expecting
character"

Where am I going wrong....can't you use the cURL variable ?

Greetings Peter
Technical Details
Message-ID: <37179E02.1E2061C3@wxs.nl>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <3713A538.A871EC9@wxs.nl> <3716CA00.A1B36B9D@ibm.net>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 15bdfb,90aa4d98f4d7cd7a
X-Google-Attributes: gid15bdfb,public
From: Peter van Mierlo <p.mierlo@wxs.nl>
Subject: Re: Internet link
Date: 1999/04/16
Message-ID: <37179E02.1E2061C3@wxs.nl>
X-Deja-AN: 467269255
Content-Transfer-Encoding: 7bit
References: <3713A538.A871EC9@wxs.nl> <3716CA00.A1B36B9D@ibm.net>
Organization: Another Netscape Collabra Server User
X-Priority: 3 (Normal)
Content-Type: text/plain; charset=us-ascii
Mime-Version: 1.0
Newsgroups: borland.public.vdbase.forms