php-windows Digest 28 May 2003 07:27:28 -0000 Issue 1750

Topics (messages 20108 through 20113):

Re: Subject: FOpen problems
        20108 by: Neil Smith
        20112 by: WL

Re: [php] [PHP-WIN] Re: extension path in php.ini
        20109 by: Alejandro C. Garrammone

Re: [personal] AW: [PHP-WIN] php.ini extension path
        20110 by: Alejandro C. Garrammone

Fatal Error???
        20111 by: Alejandro C. Garrammone
        20113 by: Cristian MARIN

Administrivia:

To subscribe to the digest, e-mail:
        [EMAIL PROTECTED]

To unsubscribe from the digest, e-mail:
        [EMAIL PROTECTED]

To post to the list, e-mail:
        [EMAIL PROTECTED]


----------------------------------------------------------------------
--- Begin Message --- Have you put a line into the top of your code like :

error_reporting(E_ALL)

? And if so, where are your errors being logged on the new server - some log to stdout (the apache logfiles) some to the console (the web browser) so if case (1) you may be getting error messages but not seeing them.

Cheers,
Neil Smith

At 14:31 27/05/2003 +0000, you wrote:
Message-ID: <[EMAIL PROTECTED]>
Subject: FOpen problems
MIME-Version: 1.0

Hi,

I've been writing a basic script which grabs a remote website (mine, on
another server unfortunately).  It used to work fine on my previous server,
but isn't on my new hosters' server.  allows_url_fopen is enabled, and I
don't know what else I can do.  Are there any tests I can run to diagnose
where it's going wrong?

Thanks

Will


--- End Message ---
--- Begin Message ---
Neil Smith <[EMAIL PROTECTED]> said:
> Have you put a line into the top of your code like :
>
> error_reporting(E_ALL)
>
> ? And if so, where are your errors being logged on the new server -
> some log to stdout (the apache logfiles) some to the console (the web
> browser) so if case (1) you may be getting error messages but not
> seeing them.

Thanks Neil.  Here's my reply to another group that I posted.  If you have
any ideas, they'd be very welcome:

OK here's what I'm getting:

Undefined variabled on line seven ($q which one of you mentioned) - this is
before the form is submitted, and I can get round this probably

Undefined variable "num" on line 47:


PHP:
$num = ($num) ? $num+1 : "16";




Another undefined:


PHP:
$data = strstr($data,"Sorted by date</b></font></td></tr></table>");




And another:


PHP:
$output .= "<?xml version="1.0\" encoding=\"UTF-8\" ?>\n";




Well I suppose this is good news, isn't it?! At least we can see what to do
(or you guys can anyway). In CF, variables generally have to be stated using
<cfparam> - but no idea how to do this in PHP...

Will



--- End Message ---
--- Begin Message ---
Hey...josh...do u read the message I posted yesterday???.
It works for Toby....so the must work with u either.

----- Original Message -----
From: "josh aldrich " <[EMAIL PROTECTED]>
To: "'Cristian MARIN'" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Monday, May 26, 2003 9:58 PM
Subject: [PHP-WIN] RE: [php] [PHP-WIN] Re: extension path in php.ini


> Why do I need to copy the extension dll into the windows directory when I
am
> trying to set the path for them in the php.ini
>
> -----Original Message-----
> From: Cristian MARIN [mailto:[EMAIL PROTECTED]
> Sent: Monday, May 26, 2003 3:07 AM
> To: [EMAIL PROTECTED]
> Subject: [php] [PHP-WIN] Re: extension path in php.ini
>
> You have to check the paths if they are all right or you forgot to copy
the
> dll's into Windows directory. Please read more carefully the install.txt
in
> your php directory.
>
> --
> -------------------------------------------------
> Cristian MARIN
> InterAKT Online (www.interakt.ro)
> [EMAIL PROTECTED]
>
>   "Josh Aldrich" <[EMAIL PROTECTED]> wrote in message
> news:[EMAIL PROTECTED]
>   Application popup: Warning : Unknown(): Unable to load dynamic library
>   'C:\php\extensions\php_gettext.dll' - The specified module could not be
>   found.
>
>   That's what I get in event viewer in xp
>
>
>
>
> --
> PHP Windows Mailing List (http://www.php.net/)
> To unsubscribe, visit: http://www.php.net/unsub.php


--- End Message ---
--- Begin Message ---
There is not "c:\extensions\" is "c:\extensions" look...it's diferent

Hope this helps,
Alex
----- Original Message -----
From: "josh aldrich " <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Tuesday, May 27, 2003 12:36 AM
Subject: [PHP-WIN] RE: [personal] AW: [PHP-WIN] php.ini extension path


http://ftp.pc-trends.com/horde/test.php?mode=phpinfo try that

-----Original Message-----
From: Sven Schnitzke [mailto:[EMAIL PROTECTED]
Sent: Monday, May 26, 2003 6:41 AM
To: 'josh aldrich '
Subject: AW: [personal] AW: [PHP-WIN] php.ini extension path

Hi,
ok PHP 4.3.1 with Apache 2.0.x is considered experimental
especially when using PHP as ISAPI module to Apache. If you
do so consider using CGI mode.

If it absolutely won't work consider using the latest release
candidate of PHP (4.3.2RC4 I think).

Personally I use Apache 1.3.23 and various flavors of PHP4
so beyond general hints on the usual pitfalls my advice is of
limited use for you.

If you didn't solve your problem yet consider reposting it with
extensive Information on your environment. (OS, PHP & Apache ver,
SAPI mode, text of PHP err msg, ...) Chances are you find someone
with a matching conf to help you with specifics.
--
Sven

> -----Ursprüngliche Nachricht-----
> Von: josh aldrich  [SMTP:[EMAIL PROTECTED]
> Gesendet am: Montag, 26. Mai 2003 06:03
> An: [EMAIL PROTECTED]
> Betreff: RE: [personal] AW: [PHP-WIN] php.ini extension path
>
> Apache 2.0.45 and php 4.3.1
>
> -----Original Message-----
> From: Sven Schnitzke [mailto:[EMAIL PROTECTED]
> Sent: Sunday, May 25, 2003 4:55 PM
> To: 'josh aldrich '
> Subject: [personal] AW: [PHP-WIN] php.ini extension path
>
> Hi,
> you may
> -search for php.ini and make sure you only have one. If there are more,
they
> are
>  obeyed in the following order 1.cwd 2.path 3. WINDIR 4. hardcoded C:\php4
>  cwd means the folder PHP.EXE is located in for CGI and CLI modes and
>  the folder the webserver resides in ISAPI mode
> -make sure access rights are ok
> -not believe path specs in PHP.INI (WIN!) are case sensitive (as WIN isn't
> they aren't)
> -not bother copying extension DLLs to SYSTEM[32] - if it works it works
> because
>  SYSTEM[32] is searched for DLLs and if necessary shows a flaw in
installing
> PHP
> -by the way: what ist the PHP version you use?
>
>
> --
> Sven
>
> > -----Ursprüngliche Nachricht-----
> > Von: josh aldrich  [SMTP:[EMAIL PROTECTED]
> > Gesendet am: Sonntag, 25. Mai 2003 13:36
> > An: [EMAIL PROTECTED]
> > Betreff: [PHP-WIN] php.ini extension path
> >
> > Help!!
> >
> > I can't get the dll's to load and I set the path in the ini file to
> >
> > extension_dir = "C:\php\extensions\"
> >
> > and there all there and change it extension=php_gettext.dll
> >
> > but I get a warring can not find library
> >
> > when I restart apache
> >
> > what am I doing wrong
> >
> >
>
>




--
PHP Windows Mailing List (http://www.php.net/)
To unsubscribe, visit: http://www.php.net/unsub.php


--- End Message ---
--- Begin Message ---
> Hi guys...I'm in trouble again...see if you can help me...
> I get the following error when I run the following script.
> Let me try to explain the code. I'm writing some code for an intranet web
> page, I'm want to print to a printer some text but I'm wanted to be
printed
> centered. If the text exceed the 20 characters the line need to be splited
> up in 2 lines...an so on...
>
> The error that I get is the following:
>
> Fatal error: Maximum execution time of 60 seconds exceeded in c:\archivos
de
> programa\apache group\apache\htdocs\printer.php on line 116
>
> The line error is marked with ******
>
> Here is the code:
>
> <?
>
> $i=20;
> $handle = printer_open();
> print printer_get_option($handle, PRINTER_PAPER_FORMAT);
> $vardumped= printer_get_option($handle, PRINTER_PAPER_WIDTH);
> $vardumped1= printer_get_option($handle, PRINTER_PAPER_LENGTH);
> printer_set_option($handle, PRINTER_PAPER_FORMAT, PRINTER_FORMAT_LEGAL);
> PRINT "$vardumped<BR>";
> PRINT "$vardumped1<BR>";
> $var1= printer_get_option($handle, PRINTER_PAPER_FORMAT);
> $var2= printer_get_option($handle, PRINTER_PAPER_WIDTH);
> $var3= printer_get_option($handle, PRINTER_PAPER_LENGTH);
> PRINT "$var1<BR>";
> PRINT "$var2<BR>";
> PRINT "$var3<BR>";
> printer_start_doc($handle, "My Document");
> printer_start_page($handle);
>
> $pen = printer_create_pen(PRINTER_PEN_SOLID, 30, "000000");
> printer_select_pen($handle, $pen);
>
>
> $text_asunto="ASUNTO N°: ";
>
> $asunto="ALEJANDRO CESAR GARRAMMONE SUPUESTO"; /*max 20*/
> $len=strlen($asunto);
> IF ($len<=20):
>  SWITCH($len):
>   case 20:
>    printer_select_font($handle, $font5); /*50*/
>    printer_draw_text($handle, "$asunto", 500, 2800);
>    break;
>   case 19:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 500, 2800);
>    break;
>   case 18:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 750, 2800);
>    break;
>   case 17:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 750, 2800);
>    break;
>   case 16:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 850, 2800);
>    break;
>   case 15:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 950, 2800);
>    break;
>   case 14:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 950, 2800);
>    break;
>   case 13:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1050, 2800);
>    break;
>   case 12:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1250, 2800);
>    break;
>   case 11:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1350, 2800);
>    break;
>   case 10:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1400, 2800);
>    break;
>   case 9:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1400, 2800);
>    break;
>   case 8:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1500, 2800);
>    break; /*100*/
>   case 7:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1700, 2800);
>    break;
>   case 6:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 1800, 2800);
>    break;
>   case 5:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 2000, 2800);
>    break;
>   case 4:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 2100, 2800);
>    break;
>   case 3:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 2200, 2800);
>    break;
>   case 2:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 2300, 2800);
>    break;
>   case 1:
>    printer_select_font($handle, $font5);
>    printer_draw_text($handle, "$asunto", 2300, 2800);
>    break;
>   ENDSWITCH;
> /*130*/
> ENDIF;
>
> IF ($len<=41):
>   WHILE ($i<>0):
>    IF ($asunto[$i]==" "):    *************This is line 116
>     $corte1=$i;
>     $i=0;
>    ENDIF;
>    $i=$i + 1;
>   ENDWHILE;
>   $i=$corte1 + 20;
>   IF ($i>=$len):
>    $i=$len;
>    ENDIF;
>
>   WHILE ($i<>$corte1):
>    IF($asunto[$i]==" "):
>     $corte2=$i;
>     $i=$corte1;
>    ENDIF;
>    $i= $i + 1;
>   ENDWHILE;
>
> ENDIF;
> $j=0;
> WHILE ($j==$corte1):
>  $asunto_p1="$asunto_p1" . $asunto[$j];
>  $j = $j + 1;
>  ENDWHILE;
> $j=$corte1;
> WHILE ($j==$corte2):
>  $asunto_p2="$asunto_p2" . $asunto[$j];
>  $j = $j + 1;
>  ENDWHILE;
>
>
>
>
>
>
>
> $font = printer_create_font("Times New Roman", 110, 55, PRINTER_FW_BOLD,
> TRUE, FALSE, FALSE, 0);
> printer_select_font($handle, $font);
> printer_draw_text($handle, "Ministerio Público", 1850, 1500);
> printer_draw_text($handle, "Unidad Fiscal de Investigación de Delitos
> Tributarios y Contrabando", 650, 1650);
> printer_draw_text($handle, "UFITCO", 2050, 1800);
> $font1=printer_create_font("Times New Roman", 143, 76, PRINTER_FW_BOLD,
> FALSE, TRUE, FALSE, 0);
> printer_select_font($handle, $font1);
> printer_draw_text($handle, "$text_asunto", 500, 2100);
> $font2=printer_create_font("Times New Roman", 143, 76, PRINTER_FW_BOLD,
> FALSE, FALSE, FALSE, 0);
> printer_select_font($handle, $font2);
> printer_draw_text($handle, "$junta", 1400, 2100);
> $font3=printer_create_font("Times New Roman", 138, 70, PRINTER_FW_BOLD,
> FALSE, TRUE, FALSE, 0);
> $font4=printer_create_font("Times New Roman", 138, 70, PRINTER_FW_BOLD,
> FALSE, FALSE, FALSE, 0);
> printer_select_font($handle, $font3);
> printer_draw_text($handle, "INVESTIGACIÓN PRELIMINAR N°: ", 500, 2400);
> printer_select_font($handle, $font4);
> printer_draw_text($handle, "$inv_prel1", 2850, 2350);
> $font5=printer_create_font("Times New Roman", 220, 83, PRINTER_FW_NORMAL,
> FALSE, FALSE, FALSE,0);
> $font6=printer_create_font("Times New Roman", 120, 62, PRINTER_FW_BOLD,
> FALSE, FALSE, FALSE,0);
>
> printer_select_font($handle, $font5);
> printer_draw_text($handle, "$asunto_p1", 1050, 2800);
> printer_draw_text($handle, "$asunto_p2", 1050, 3100);
> printer_draw_text($handle, "$corte3", 1050, 3400);
>
>
> printer_select_font($handle, $font6);
> printer_draw_text($handle, "Fecha de Recepción en la UFITCO: $fecha_as1",
> 500, 4000);
> printer_draw_text($handle, "Secretaria: $sec_a_cargo1", 500, 4300);
> printer_draw_text($handle, "Responsable: $responsable1", 500, 4600);
> printer_draw_text($handle, "Observaciones:", 500, 4900);
> printer_draw_line($handle, 1600, 5000, 4500, 5000);
> printer_draw_line($handle, 500, 5300, 4500, 5300);
> printer_draw_line($handle, 500, 5600, 4500, 5600);
> printer_draw_line($handle, 500, 5900, 4500, 5900);
> printer_draw_line($handle, 500, 6200, 4500, 6200);
> printer_draw_text($handle, "Juzgado N°: 5", 2850, 6500);
> printer_draw_text($handle, "Secretaría N°: 10", 2850, 6800);
> printer_draw_text($handle, "Fiscalía N°: 6", 2850, 7100);
>
>
>
> printer_draw_bmp($handle, "c:\\escudo.bmp", 2000, 540);
>
>
>
> printer_delete_pen($pen);
>
> printer_end_page($handle);
> printer_end_doc($handle);
> printer_close($handle);
>
>
> ?>
>
> <HTML>
> <HEAD>
> <meta name="Microsoft Theme" content="indust 011">
> </head>
> <BODY background="indtextb.jpg" bgcolor="#FFFFFF" text="#000000"
> link="#3366CC" vlink="#666666" alink="#996600">
> <!--mstheme--><font face="Trebuchet MS, Arial, Helvetica">
> <CENTER><P><i><b><font color="#0000FF"></center>
> <center> <font size="3">
> </font><br>
> <FORM ACTION="as_insercion.php" METHOD="POST">
> <? $submit="True"; ?>
> <INPUT TYPE="hidden" NAME="submit" VALUE="<? echo $submit ?>">
> <P>
> <INPUT TYPE="hidden" NAME="usuario" VALUE="<? echo $usuario ?>">
> <P>
> <INPUT TYPE="hidden" NAME="passwrd" VALUE="<? echo $passwrd ?>">
> <P>
>
> <CENTER><INPUT TYPE="submit" name="submit" VALUE="Insertar otra
> Denuncia"></CENTER>
>
> </FORM></CENTER>
>
> </TD></TR></TABLE>
> <!--mstheme--><font face="Trebuchet MS, Arial, Helvetica">
> <br>
> <center> <font size="3">
> </font><br>
> <a href="asunto.html">Salir y volver a la pagina principal de
> Asuntos.</a><BR>
> <a href="index.html">Salir y volver a la pagina principal.</a>
> </center>
>
> <!--mstheme--></font>
>
> </BODY>
> </HTML>
>


--- End Message ---
--- Begin Message ---
All the loops you are doing are infinite loops because as for example the first loop:
                                              // $i do not have a initial value which 
is a bug
WHILE ($i<>0):                // The loop exit when $i = 0
    IF ($asunto[$i]==" "):   // we verify if the position $i of the $assunto is " " 
but $i doesn't have a value so ... we verify $assunto[]
             $corte1=$i;       //  save the $i value into $corte1
             $i=0;               //   reset $i (it's not right you have to put it -1)
    ENDIF;
    $i=$i + 1;                  // increase $i with 1 so even if we have putted $i = 0 
$i will have minimum value 1 so the loop is infinite.
                                            // $i is now, after the first loop. 21 on 
my computer :) you have omitted 20 positions of $assunto
ENDWHILE;


All the loops are the same, please verify them yourself.

Cristic

-- 
-------------------------------------------------
Cristian MARIN
InterAKT Online (www.interakt.ro)
[EMAIL PROTECTED]

  "Alejandro C. Garrammone" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED]

  > Hi guys...I'm in trouble again...see if you can help me...
  > I get the following error when I run the following script.
  > Let me try to explain the code. I'm writing some code for an intranet web
  > page, I'm want to print to a printer some text but I'm wanted to be
  printed
  > centered. If the text exceed the 20 characters the line need to be splited
  > up in 2 lines...an so on...
  >
  > The error that I get is the following:
  >
  > Fatal error: Maximum execution time of 60 seconds exceeded in c:\archivos
  de
  > programa\apache group\apache\htdocs\printer.php on line 116
  >
  > The line error is marked with ******
  >
  > Here is the code:
  >
  > <?
  >
  > $i=20;
  > $handle = printer_open();
  > print printer_get_option($handle, PRINTER_PAPER_FORMAT);
  > $vardumped= printer_get_option($handle, PRINTER_PAPER_WIDTH);
  > $vardumped1= printer_get_option($handle, PRINTER_PAPER_LENGTH);
  > printer_set_option($handle, PRINTER_PAPER_FORMAT, PRINTER_FORMAT_LEGAL);
  > PRINT "$vardumped<BR>";
  > PRINT "$vardumped1<BR>";
  > $var1= printer_get_option($handle, PRINTER_PAPER_FORMAT);
  > $var2= printer_get_option($handle, PRINTER_PAPER_WIDTH);
  > $var3= printer_get_option($handle, PRINTER_PAPER_LENGTH);
  > PRINT "$var1<BR>";
  > PRINT "$var2<BR>";
  > PRINT "$var3<BR>";
  > printer_start_doc($handle, "My Document");
  > printer_start_page($handle);
  >
  > $pen = printer_create_pen(PRINTER_PEN_SOLID, 30, "000000");
  > printer_select_pen($handle, $pen);
  >
  >
  > $text_asunto="ASUNTO N°: ";
  >
  > $asunto="ALEJANDRO CESAR GARRAMMONE SUPUESTO"; /*max 20*/
  > $len=strlen($asunto);
  > IF ($len<=20):
  >  SWITCH($len):
  >   case 20:
  >    printer_select_font($handle, $font5); /*50*/
  >    printer_draw_text($handle, "$asunto", 500, 2800);
  >    break;
  >   case 19:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 500, 2800);
  >    break;
  >   case 18:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 750, 2800);
  >    break;
  >   case 17:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 750, 2800);
  >    break;
  >   case 16:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 850, 2800);
  >    break;
  >   case 15:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 950, 2800);
  >    break;
  >   case 14:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 950, 2800);
  >    break;
  >   case 13:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1050, 2800);
  >    break;
  >   case 12:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1250, 2800);
  >    break;
  >   case 11:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1350, 2800);
  >    break;
  >   case 10:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1400, 2800);
  >    break;
  >   case 9:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1400, 2800);
  >    break;
  >   case 8:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1500, 2800);
  >    break; /*100*/
  >   case 7:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1700, 2800);
  >    break;
  >   case 6:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 1800, 2800);
  >    break;
  >   case 5:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 2000, 2800);
  >    break;
  >   case 4:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 2100, 2800);
  >    break;
  >   case 3:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 2200, 2800);
  >    break;
  >   case 2:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 2300, 2800);
  >    break;
  >   case 1:
  >    printer_select_font($handle, $font5);
  >    printer_draw_text($handle, "$asunto", 2300, 2800);
  >    break;
  >   ENDSWITCH;
  > /*130*/
  > ENDIF;
  >
  > IF ($len<=41):
  >   WHILE ($i<>0):
  >    IF ($asunto[$i]==" "):    *************This is line 116
  >     $corte1=$i;
  >     $i=0;
  >    ENDIF;
  >    $i=$i + 1;
  >   ENDWHILE;
  >   $i=$corte1 + 20;
  >   IF ($i>=$len):
  >    $i=$len;
  >    ENDIF;
  >
  >   WHILE ($i<>$corte1):
  >    IF($asunto[$i]==" "):
  >     $corte2=$i;
  >     $i=$corte1;
  >    ENDIF;
  >    $i= $i + 1;
  >   ENDWHILE;
  >
  > ENDIF;
  > $j=0;
  > WHILE ($j==$corte1):
  >  $asunto_p1="$asunto_p1" . $asunto[$j];
  >  $j = $j + 1;
  >  ENDWHILE;
  > $j=$corte1;
  > WHILE ($j==$corte2):
  >  $asunto_p2="$asunto_p2" . $asunto[$j];
  >  $j = $j + 1;
  >  ENDWHILE;
  >
  >
  >
  >
  >
  >
  >
  > $font = printer_create_font("Times New Roman", 110, 55, PRINTER_FW_BOLD,
  > TRUE, FALSE, FALSE, 0);
  > printer_select_font($handle, $font);
  > printer_draw_text($handle, "Ministerio Público", 1850, 1500);
  > printer_draw_text($handle, "Unidad Fiscal de Investigación de Delitos
  > Tributarios y Contrabando", 650, 1650);
  > printer_draw_text($handle, "UFITCO", 2050, 1800);
  > $font1=printer_create_font("Times New Roman", 143, 76, PRINTER_FW_BOLD,
  > FALSE, TRUE, FALSE, 0);
  > printer_select_font($handle, $font1);
  > printer_draw_text($handle, "$text_asunto", 500, 2100);
  > $font2=printer_create_font("Times New Roman", 143, 76, PRINTER_FW_BOLD,
  > FALSE, FALSE, FALSE, 0);
  > printer_select_font($handle, $font2);
  > printer_draw_text($handle, "$junta", 1400, 2100);
  > $font3=printer_create_font("Times New Roman", 138, 70, PRINTER_FW_BOLD,
  > FALSE, TRUE, FALSE, 0);
  > $font4=printer_create_font("Times New Roman", 138, 70, PRINTER_FW_BOLD,
  > FALSE, FALSE, FALSE, 0);
  > printer_select_font($handle, $font3);
  > printer_draw_text($handle, "INVESTIGACIÓN PRELIMINAR N°: ", 500, 2400);
  > printer_select_font($handle, $font4);
  > printer_draw_text($handle, "$inv_prel1", 2850, 2350);
  > $font5=printer_create_font("Times New Roman", 220, 83, PRINTER_FW_NORMAL,
  > FALSE, FALSE, FALSE,0);
  > $font6=printer_create_font("Times New Roman", 120, 62, PRINTER_FW_BOLD,
  > FALSE, FALSE, FALSE,0);
  >
  > printer_select_font($handle, $font5);
  > printer_draw_text($handle, "$asunto_p1", 1050, 2800);
  > printer_draw_text($handle, "$asunto_p2", 1050, 3100);
  > printer_draw_text($handle, "$corte3", 1050, 3400);
  >
  >
  > printer_select_font($handle, $font6);
  > printer_draw_text($handle, "Fecha de Recepción en la UFITCO: $fecha_as1",
  > 500, 4000);
  > printer_draw_text($handle, "Secretaria: $sec_a_cargo1", 500, 4300);
  > printer_draw_text($handle, "Responsable: $responsable1", 500, 4600);
  > printer_draw_text($handle, "Observaciones:", 500, 4900);
  > printer_draw_line($handle, 1600, 5000, 4500, 5000);
  > printer_draw_line($handle, 500, 5300, 4500, 5300);
  > printer_draw_line($handle, 500, 5600, 4500, 5600);
  > printer_draw_line($handle, 500, 5900, 4500, 5900);
  > printer_draw_line($handle, 500, 6200, 4500, 6200);
  > printer_draw_text($handle, "Juzgado N°: 5", 2850, 6500);
  > printer_draw_text($handle, "Secretaría N°: 10", 2850, 6800);
  > printer_draw_text($handle, "Fiscalía N°: 6", 2850, 7100);
  >
  >
  >
  > printer_draw_bmp($handle, "c:\\escudo.bmp", 2000, 540);
  >
  >
  >
  > printer_delete_pen($pen);
  >
  > printer_end_page($handle);
  > printer_end_doc($handle);
  > printer_close($handle);
  >
  >
  > ?>
  >
  > <HTML>
  > <HEAD>
  > <meta name="Microsoft Theme" content="indust 011">
  > </head>
  > <BODY background="indtextb.jpg" bgcolor="#FFFFFF" text="#000000"
  > link="#3366CC" vlink="#666666" alink="#996600">
  > <!--mstheme--><font face="Trebuchet MS, Arial, Helvetica">
  > <CENTER><P><i><b><font color="#0000FF"></center>
  > <center> <font size="3">
  > </font><br>
  > <FORM ACTION="as_insercion.php" METHOD="POST">
  > <? $submit="True"; ?>
  > <INPUT TYPE="hidden" NAME="submit" VALUE="<? echo $submit ?>">
  > <P>
  > <INPUT TYPE="hidden" NAME="usuario" VALUE="<? echo $usuario ?>">
  > <P>
  > <INPUT TYPE="hidden" NAME="passwrd" VALUE="<? echo $passwrd ?>">
  > <P>
  >
  > <CENTER><INPUT TYPE="submit" name="submit" VALUE="Insertar otra
  > Denuncia"></CENTER>
  >
  > </FORM></CENTER>
  >
  > </TD></TR></TABLE>
  > <!--mstheme--><font face="Trebuchet MS, Arial, Helvetica">
  > <br>
  > <center> <font size="3">
  > </font><br>
  > <a href="asunto.html">Salir y volver a la pagina principal de
  > Asuntos.</a><BR>
  > <a href="index.html">Salir y volver a la pagina principal.</a>
  > </center>
  >
  > <!--mstheme--></font>
  >
  > </BODY>
  > </HTML>
  >


--- End Message ---

Reply via email to