Web Link within a database

[ges...@gmail.com]

Can I create a desktop application with FS7 and have a clients.dbf with a web address field and an email field

that are clickable and executable?

Please give a hint on the coding?

Thanks

Reginald

[Angelos Christodoulou]

Hi Reginald

 

We fire off a web based catalogue lookup for our clients that sell motor spares and need to look @ vehicle catalogues on line. Perhaps the code below (slightly modified from our code) will assist

Have never done a link to an eMail address but if you explain a little better what you are trying to achieve, we will gladly take a look @ helping / suggesting.  

 

 

cWhichOs := GETENV("OS")                                                    // Var to hold the Operating System settings

cWeblink := ALLTRIM( clients->weblink )                                // This would be the field in your client file that holds the Web link

 

IF LEFT(UPPER(cWhichOs), 3) == "WIN"                                // If your system is running in Windows

                cCommand := 'iexplore.exe '+cWeblink                   // You probably need to have the path in front of the iexplore

ELSE

                cCommand := '/usr/bin/firefox '+cWeblink

ENDIF

run &cCommand

--
You received this message because you are subscribed to the Google
Groups "multisoft FlagShip" group. To post to this group, send email
to multisoft...@googlegroups.com. To unsubscribe from this
group, send email to multisoft-flags...@googlegroups.com.
For more options, visit this group at
http://groups.google.com/group/multisoft-flagship?hl=en.
 
 

---

No virus found in this message.
Checked by AVG - www.avg.com
Version: 2012.0.2197 / Virus Database: 2437/5142 - Release Date: 07/19/12

[Paul]

Probably like this:

   cBrowser := "C:\Program Files (x86)\Mozilla Firefox\firefox.exe"
   // cBrowser := "C:\Program Files (x86)\Internet Explorer\iexplore.exe"

   use mydbf
   cWebAddr := alltrim(mydbf->WEBADDR)  // e.g. "http://www.fship.com"
   // cWebAddr := "http://www.fship.com/faq_vfs.html"

   oPush := PushButton{10,40, cWebAddr}
   oPush:Notify := {|obj| __run('"' + cBrowser + '" "' + obj:Caption + '"')}
   oPush:Display()
   //...
   wait

Paul

[maty...@gmx.net]

Am Donnerstag, 19. Juli 2012 22:00:59 UTC+2 schrieb ges...@gmail.com:

Can I create a desktop application with FS7 and have a clients.dbf with a web address field and an email field

that are clickable and executable?

In der _cpp Variable ist das DBF Feld gespeichert.

 IF EMPTY(Internet1_cpp) 

       WARNBOX("Keine Web-Adresse vorhanden !","Info")
    ELSE
      RUN("START IExplore.exe &Internet1_cpp")
    ENDIF

    IF EMPTY(Mail1_cpp) 
      WARNBOX("Keine E-Mail Adresse vorhanden","Warnung")
    ELSE
      RUN("START MAILTO:&Mail1_cpp /w")
    ENDIF

 

Gruß

Johann

Thanks

Reginald