DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Visual Basic 4 / 5 / 6 RSS

PHP Script Translate To VB 6.0

•

Join Date: May 2006

Posts: 1

Reputation: SYEDHANIF is an unknown quantity at this point

Solved Threads: 0

SYEDHANIF

Offline

Newbie Poster

PHP Script Translate To VB 6.0

May 20th, 2006

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
class Astro
{
  var $jd;
  var $dec;
  var $ra;
  var $sid;
  var $dra;
  var $rsum;
  function Astro()
  {
    $this->jd   = 0.0;
    $this->dec  = array(0.0, 0.0, 0.0);
    $this->ra   = array(0.0, 0.0, 0.0);
    $this->sid  = array(0.0, 0.0, 0.0);
    $this->dra  = array(0.0, 0.0, 0.0);
    $this->rsum = array(0.0, 0.0, 0.0);
  }
  function copyFrom(&$source)
  {
    $this->jd   = $source->jd;
    $this->dec  = array_values($source->dec);
    $this->ra   = array_values($source->ra);
    $this->sid  = array_values($source->sid);
    $this->dra  = array_values($source->dra);
    $this->rsum = array_values($source->rsum);
  }
};
class Astro
{
  var $jd;
  var $dec;
  var $ra;
  var $sid;
  var $dra;
  var $rsum;
  function Astro()
  {
    $this->jd   = 0.0;
    $this->dec  = array(0.0, 0.0, 0.0);
    $this->ra   = array(0.0, 0.0, 0.0);
    $this->sid  = array(0.0, 0.0, 0.0);
    $this->dra  = array(0.0, 0.0, 0.0);
    $this->rsum = array(0.0, 0.0, 0.0);
  }
  function copyFrom(&$source)
  {
    $this->jd   = $source->jd;
    $this->dec  = array_values($source->dec);
    $this->ra   = array_values($source->ra);
    $this->sid  = array_values($source->sid);
    $this->dra  = array_values($source->dra);
    $this->rsum = array_values($source->rsum);
  }
};

this the php script i need this script to translate in vb 6.0 i am really confuse on certian area how to bring this code in vb can any body please help out

regards
syedhanif

Last edited by Comatose; May 20th, 2006 at 7:11 am.

•

Join Date: Dec 2004

Posts: 2,413

Reputation: Comatose is a jewel in the rough

Solved Threads: 211

Comatose

Offline

Taboo Programmer

Re: PHP Script Translate To VB 6.0

May 21st, 2006

I'm not 100% sure what is happening in the PHP Script. It looks to me like it defines some variables, and has a constructor function (called Astro), which does nothing but assign the value 0 to the members of the astro class. 1 scalar and 5 arrays. Then, there is a function (method) called copyFrom, which takes a source value (I'm guessing it's another instance of the same class), and sets the current instances values to the same thing. While this is nifty, it's not plausible in Vb6. The reason, is because arrays are not allowed as public members of a class. So, even when passed, the values stay encapsulated, and can not be referenced from another class (there may be a workaround using addressof, but I haven't been able to pull one off yet).

Quick Reply to Thread

Show Printable Version

Similar Threads

Other Threads in the Visual Basic 4 / 5 / 6 Forum

Previous Thread: Beep
Next Thread: Exporting Recordset into txt delimited

Thread Tools	Search this Thread
Show Printable Version Email this Page

DaniWeb Message

Cancel Changes