rewrite asp code to php

**Pedro Graca** · Jul 17 '05, 09:05 AM

Re: rewrite asp code to php

Aldo wrote:[color=blue]
> i'm trying to translate this asp code to php, but i can't get it work right.
> could anyone help me? thanks![/color]
[snip code]

maybe http://www.google.com/search?q=asp%20to%20php

--
USENET would be a better place if everybody read:

http://www.expita.com/nomime.html

How do I quote correctly in Usenet? - Quoting and Answering

http://www.netmeister.org/news/learn2quote2.html

http://www.catb.org/~esr/faqs/smart-questions.html

**Alvaro G. Vicario** · Jul 17 '05, 09:05 AM

Re: rewrite asp code to php

*** Aldo escribió/wrote (11 Oct 2004 10:16:16 -0700):[color=blue]
> i'm trying to translate this asp code to php, but i can't get it work right.
> could anyone help me?[/color]

Maybe if you could shorten the question... Nobody's going to check six
hundred lines of code for you.

--
-+ Álvaro G. Vicario - Burgos, Spain
+- http://www.demogracia.com (la web de humor barnizada para la intemperie)
++ Las dudas informáticas recibidas por correo irán directas a la papelera
-+ I'm not a free help desk, please don't e-mail me your questions
--

**Aldo** · Jul 17 '05, 09:05 AM

Re: rewrite asp code to php

Yes i think you're right ;-)…

here the two functions I can't get to work in php.
the array who is feeding the function "GenerateNested Array" has this structure:
$mArrContent[1][0]=0; 'counter
$mArrContent[1][1]=42; 'id
$mArrContent[1][2]="folder"; 'folder or page
$mArrContent[1][3]="Leistungen "; 'title
$mArrContent[1][4]=34; 'parent id

my goal is to build a multidimensiona l array with the right folder structure

ASP
-------------
'Call the function to Generate the Nested Array
marrMain = GenerateNestedA rray(mArrConten t)

'/*************** *************** ****
'This is the function that generate
'the nested array based on a given
'multidimension al array
'/*************** *************** ****
Function GenerateNestedA rray(ArrContent )
Dim arrMain
Dim arrSub
Dim arrSubContent
Redim arrSub(5)
Redim arrMain(0)
Dim lngCount
For i = 1 to UBound(arrConte nt)
Redim arrSubContent(0 )
if arrContent(i,4) = 34 then
lngCount = lngCount + 1
Redim Preserve arrMain(lngCoun t)
For j = 0 to 4
arrSub(j) = ArrContent(i,j)
next
arrSub(5) = arrSubContent
arrMain(lngCoun t) = arrSub
else
for j = 1 to Ubound(arrMain)
For k = 0 to 4
arrSub(k) = arrContent(i,k)
next
arrSub(5) = arrSubContent
if FindParent(arrM ain(j), arrSub) = true then
exit for
End if
Next
end if
next
GenerateNestedA rray = arrMain
end function

'/*************** *************** ****
'This is the function that
'recursively find the parent
'folder of a given page or folder
'and then places the data into
'the fifth element of the parent array
'/*************** *************** ****
Function FindParent(arrP arent, arrContent)
On error resume next
Dim arrSub(5)
Dim arrTemp(5)
Dim arrSubContent(0 )
Dim arrSubArray
Dim lngCount
if arrParent(1) = arrContent(4) then
For j = 0 to 4
arrSub(j) = arrContent(j)
next
arrSub(5) = arrSubContent
if Ubound(arrParen t(5)) = 0 then
lngCount = 1
redim ArrSubArray(1)
arrSubArray(1) = arrSub
else
lngCount = Ubound(arrParen t(5)) + 1
Redim arrSubArray(lng Count)
for j = 1 to lngCount -1
arrSubArray(j)= arrParent(5)(j)
Next
arrSubArray(lng Count) = arrContent
end if
arrParent(5) = arrSubArray
FindParent = true
Exit Function
elseif Ubound(arrParen t(5)) > 0 then
for i = 1 to Ubound(arrParen t(5))
blnFindParent = FindParent(arrP arent(5)(i), arrContent)
if blnFindParent = true then
Exit function
end if
next
end if
FindParent = false
End Function

PHP
--------------------

//Call the function to Generate the Nested Array
$marrMain=Gener ateNestedArray( $mArrContent);

//Call the function to Generate the HTML script
GenerateHTML($m arrMain);

///*************** *************** ****
// This is the function that generate
// the nested array based on a given
// multidimensiona l array
///*************** *************** ****

function GenerateNestedA rray($arrConten t) {

$arrMain = array();
$arrSub = array();
$arrSubContent = array();

for ($i=1;$i<=count ($arrContent);$ i++) {

if ($arrContent[$i][4]==34) {
$lngCount++;
for ($j=0;$j<=4;$j+ +) {
$arrSub[$j] = $arrContent[$i][$j];
}
$arrSub[5] = $arrSubContent;
$arrMain[$lngCount] = $arrSub;

} else {

for ($j=1;$j<=count ($arrMain);$j++ ) {

for($k=0;$k<4;$ k++){
$arrSub[$k] = $arrContent[$i][$k];
}
$arrSub[5] = $arrSubContent;
if (FindParent($ar rMain[$j],$arrSub)===fal se) {
break;
}
}

}
}

return $arrMain;
}

///*************** *************** ****
// This is the function that
// recursively find the parent
// folder of a given page or folder
// and then places the data into
// the fifth element of the parent array
///*************** *************** ****

function FindParent($arr Parent,$arrCont ent) {

$arrSub = array();
$arrSubContent = array();
$arrSubArray = array();

if ($arrParent[1]==$arrContent[4]) {

for ($j=0;$j<=4;$j+ +) {
$arrSub[$j] = $arrContent[$j];
}
$arrSub[5] = $arrSubContent;

if(count($arrPa rent[5])==0) {
$lngCount = 1;
$arrSubArray[] = $arrSub;
} else {
$lngCount = count($arrParen t[5])+1;
for($j=1;$i<=$l ngCount-1;$j++) {
$arrSubArray[$j] = $arrParent[5][$j];
}
$arrSubArray[$j] = $arrContent;
}

$arrParent[5] = $arrSubArray;
return true;

} else if (count($arrPare nt[5])>0) {

for ($i=1;$i<=count ($arrParent[5]);$i++) {
$blnFindParent = FindParent($arr Parent[5][$i],$arrContent);
if ($blnFindParent == true) {
break;
}
}
}

return false;

}

"Alvaro G. Vicario" <kAlvaroNOSPAMT HANKS@terra.es> wrote in message news:<lgh250l3c vcz.1dj1915u8as uj.dlg@40tude.n et>...[color=blue]
> *** Aldo escribió/wrote (11 Oct 2004 10:16:16 -0700):[color=green]
> > i'm trying to translate this asp code to php, but i can't get it work right.
> > could anyone help me?[/color]
>
> Maybe if you could shorten the question... Nobody's going to check six
> hundred lines of code for you.[/color]

rewrite asp code to php

rewrite asp code to php

Comment

Comment

Comment