topic-26527

Posts: 824

Joined: Thu Oct 13, 2005 07:39 AM

Fiveweb - xbrowse
Posted: Mon Jun 10, 2013 02:54 PM

Hi friends,

does anyone has a sample how to browse a dbf with fiveweb ?

The following does not work, the browse is empty

Code (fw): Select all Collapse

#include "FiveWeb.ch"

function Main()

   local oDlg, oBtn, oBrw

  SET THEME TO "humanity"

   DEFINE DIALOG oDlg TITLE "Veranstaltungen" ;
      SIZE 719, 397.5

   @ 24, 8 BROWSE oBrw SIZE 729, 302 OF oDlg URL "zeus03/cgi-bin/Beleg.dbf"

   @ 355, 10 BUTTON oBtn PROMPT "OK"  SIZE 110, 40 OF oDlg

   ACTIVATE DIALOG oDlg

return nil

kind regards

Stefan

ADutheil

Posts: 368

Joined: Sun May 31, 2009 06:25 PM

Re: Fiveweb - xbrowse
Posted: Mon Jun 10, 2013 04:00 PM

I think you should drop URL "zeus03/cgi-bin/Beleg.dbf" and open the database with normal USE command.

Regards,

André Dutheil

FWH 13.04 + HB 3.2 + MSVS 10

StefanHaupt

Posts: 824

Joined: Thu Oct 13, 2005 07:39 AM

Re: Fiveweb - xbrowse
Posted: Tue Jun 11, 2013 06:49 AM

Andre,

that does not work, I get a runtime error

FiveWeb error

Application
===========
Path and name: E:\xampp\cgi-bin\browse.exe (32 bits)
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 06/11/13, 08:44:44
Error description: Error BASE/1081
Argument error: +
Args:
[ 1] = C
RNR RCODE BCODE KURSID START ENDE TAG ZEITRAUM NUTZER NUTZERTYP VORLESUNG KURSTYP MO MO_V MO_B DI DI_V DI_B MI MI_V MI_B DO DO_V DO_B FR FR_V FR_B SA SA_V SA_B KOSTEN SUMME
1111 1:1111 1:12215217252
[ 2] = N 1

Stack Calls
===========
Called from TBROWSE:CREATEFROMCODE(201)
Called from TBROWSE:NEW(49)
Called from MAIN(20)

Code (fw): Select all Collapse

#include "FiveWeb.ch"

function Main()

   local oDlg, oBtn, oBrw

   REQUEST DBFCDX
   REQUEST DBFFPT
   REQUEST OrdKeyCount

   RDDSETDEFAULT ("DBFCDX")

  SET THEME TO "humanity"

  USE Beleg NEW ALIAS Beleg SHARED

   DEFINE DIALOG oDlg TITLE "Veranstaltungen" ;
      SIZE 719, 397.5

   @ 24, 8 BROWSE oBrw SIZE 729, 302 OF oDlg //URL "zeus03/cgi-bin/Beleg.dbf"

   @ 355, 10 BUTTON oBtn PROMPT "OK"  SIZE 110, 40 OF oDlg

   ACTIVATE DIALOG oDlg

   CLOSE ALL

return nil

Any other hints ?

kind regards

Stefan

FiveTech Support Forums

Continue the discussion