muy buena info.

pero valdra cara lo mas seguro los 10 mil pesos

te pregunto.


crees que esta bien????

analizalo porque encontraras el problema.

no esperes que te digamo todo. usa la cabeza y analiza.

Los textos te hablan 

Hola a todos 

no me lo lei todo pero en mi opinion de porque se hizo largo es..

1. el usuario engel lex no tuvo la mas minima idea de como implementarlo desde el inicio del tema.
2. los errores de contextos.

veo que tambien tenia algo que ver el servidor donde se alojaba los formatos.
re: todos los servidores tienen la version mas actualizada del php, el problema fue las variables get no fueron definidas y eso probocaba el error.

Nunca encontraras un servidor con una version vieja 

muy basico.

llamada de la variable.

name="imagen1"

el error es..

name="imagen[]"

en el otro lado del php

$_GET['imagen']

no esta la variable definida por que en su formulario no tiene la llamada.
se nota la diferencia.

$_GET['imagen1']

error grave

if(!$imagen)
imagedestroy($im);

como le vas a dejar porque son ambas donde llaman hacia el get.

---

de igual manera te dejo bien el código cURL.
pero si arreglas el codigo que te pasaron que estaba mal, te funcionara probalo.

¿ahora le queres poner la ip y el texto?

imagejpeg($imagen);
imagesavealpha($imagen, true);
imagejpeg($imagen, $nombre, 100);

porque le pones imagejpeg si estas usando imagenes png

el codigo que dejastes

if ($_SERVER["HTTP_X_FORWARDED_FOR"]){
$ip = $_SERVER["HTTP_X_FORWARDED_FOR"];
}else{
$ip = $_SERVER["REMOTE_ADDR"];
}
$ip = explode(",", $ip);
$ip = "Tu IP ES:".$ip[0];

si lo pones en el codigo que te dejo #!drvy
nunca te va a funcionar por ya nombro la variable en el if
debes hacerla con el codigo anterior.
tenes que usarla tambien para tu texto que quieras poner.

imagefttext($imagen, 21, 0, 130, 100, $ip, $color, $fuente, $id);

PD: No tiren códigos sin haberlos previamente probado

Saludos!

te edito una parte.

Option Explicit
Private Sub Form_Load()
lbl_Nombre.Caption = Environ("ComputerName")
If AbrirProceso Then
  lbl_Password.Caption = Leer(&H14FC80)
End If
End Sub-alt
Public Sub Label1_Click()
End
End Sub

La tenes que dejar en Public en la liena label1

para realizar una llamada al string tenes que usar

Public Declare Function GetWindowThreadProcessId Lib "user"

el modulo nunca te va a funcionar si lo pones en privada.

lo demas lo compones como se debe!!

Saludos!