• Domingo 28 de Abril de 2024, 07:51

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Temas - Neone

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Función Circle
« en: Miércoles 12 de Abril de 2006, 22:02 »
Hola,

Estoy usando la función circle para representar unos circulos en el formulario pero tengo un problema, al arrastrar una ventana por encima del circle ( el qual esta relleno de un color) , este se borra como si la ventana de encima, al arrastrarla actuara como goma.

SI pongo el autoredraw del form en true, se borran nada más aparecer.....


Alguien sabe como solucionarlo?

Gracias, un saludo.

2
Visual Basic 6.0 e inferiores / Parámetros Que Puedo Pasarle A Excel
« en: Domingo 2 de Abril de 2006, 16:11 »
Wenas, estoy haciendo un programa con visual y guardo las variables en una hoja de calculo de excel, mi pregunta es, a parte de estos:

Application.workbooks(1).Activate
Application.ScreenUpdating
HojaLibro.ActiveSheet.Cells(1, 1).Value
....


QUE OTROS PARAMETROS PUEDO PASARLE O CAPTAR DE EXCEL?

Gracias un saludo!

3
Visual Basic 6.0 e inferiores / Problema Con La Función Circle
« en: Miércoles 29 de Marzo de 2006, 12:36 »
Wenass, utilizo la función circle para representar unos circulos en el formulario pero tengo un problema, al arrastrar una ventana por encima del circle ( el qual esta relleno de un color) , este se borra como si la ventana de encima, al arrastrarla actuara como goma.

Alguin sabe como solucionarlo?

Gracias, un saludo.

4
Visual Basic 6.0 e inferiores / Evitar Desplazamiento Msgbox
« en: Miércoles 29 de Marzo de 2006, 12:33 »
Hola! Como puedo evitar que se puedan arrastrar los MSGBOX? Y los formularios? Gracias , un saludo.

5
Visual Basic 6.0 e inferiores / Exportar Variables A Tabla Exel
« en: Miércoles 29 de Marzo de 2006, 12:25 »
Buenas! Estoy haciendo un programa y necesito que me exporte las variables desde visual basic 5 a una hoja de calculo exel (que yo lo pueda decir en que fila y columna ponerlo).

He encontrado por internet un tal "Exelexport.zip" pero no me funciona.

Alguien puede hecharme un cable? ( Para Visual Basic 5)

Gracias!

6
PHP / Enviar Datos Con Un Formulario
« en: Domingo 19 de Marzo de 2006, 16:43 »
Wenas, estoy haciendo un formulario y quiero que los usuarios puedan enviarme su foto, y esta me llegue por correo, como puedo poner el campo de formulario para que me puedan adjuntar la foto?

Gracias!

7
PHP / Formulario No Manda Confirmación
« en: Sábado 18 de Marzo de 2006, 19:19 »
Hola! He realizado un formulario que envia unos datos a un correo y manda un email de confirmación a quien lo ha mandado.

Mi problema está en que no se recibe el correo de confirmación. Os pego el código:

<html>
<head>
<title>Inscripcions PlayParty 2006</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><style type="text/css">
<!--
body {
margin-top: 0px;
background-image: url(fonc.jpg);
}
.Estilo1 {color: #000000}
.Estilo13 {color: #000000; font-weight: bold; }
-->
</style></head>

<body bgcolor="#FFFFFF" text="#000000" link="#006060" vlink="#006060">
<table width="482" border="0">
<td width="188"><tr>
<td>
<?
if (!$HTTP_POST_VARS){
?>
<p> </p>
<p> </p>
<p align="left">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].url+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
<script>
function Validar(form){


if (play.nom.value == "")
{ alert("Introdueix el teu nom"); play.nom.focus(); return; }

if (play.nick.value == "")
{ alert("Introdueix el teu nick"); play.nick.focus(); return; }

if (play.email.value == "")
{ alert("Introdueix el teu E-mail"); play.email.focus(); return; }

play.submit();
}
</script>

<form action="form.php" method="post" name="play" class="Estilo1">

<table width="482" border="0" cellspacing="0">
<tr>
<td><span class="Estilo13">Nom i cognoms </span></td>
<td><input type=text name="nom" size=30></td>
</tr>
<tr>
<td><span class="Estilo13">Nick</span></td>
<td><input name="nick" type=text id="nick" size=20></td>
</tr>
<tr>
<td><span class="Estilo13">Clan</span></td>
<td><input name="clan" type=text id="clan" size=20></td>
</tr>
<tr>
<td><span class="Estilo13">Num. Mòbil</span></td>
<td><input name="mobil" type=text id="mobil" size=20></td>
</tr><tr>
<td><span class="Estilo13">E-mail</span></td>
<td><input name="email" type=text id="email" size=30></td>
</tr>
<tr>
<td><span class="Estilo13">Observacions</span></td>
<td><textarea name="comentari" cols="40" rows="8" id="comentari"></textarea></td>
</tr>
</table>

</form>
<center><div align="center">
<input TYPE="button" value="Enviar" onClick="Validar(this.form)">
<?
}else{
//Estoy recibiendo el formulario, compongo el cuerpo

$msg = "Formulario enviado\n";
$msg .= "Nom: " . $HTTP_POST_VARS["nom"] . "\n";
$msg .= "Nick: " . $HTTP_POST_VARS["nick"] . "\n";
$msg .= "Clan: " . $HTTP_POST_VARS["clan"] . "\n";
$msg .= "E-mail: " . $HTTP_POST_VARS["email"] . "\n";
$msg .= "Telèfon mòbil: " . $HTTP_POST_VARS["mobil"] . "\n";
$msg .= "Observacions: " . $HTTP_POST_VARS["comentari"] . "\n";

$sender_name = "Nova inscripció Play Party";
$sender_email = "Web";

$headers = "MIME-Version: 1.0\r \n";
$headers .= "Content-type: text/html; charset=iso-8859-1\r \n";
$headers .= "From: \"$nombre\" <$email_my>\r \n"; //$headers .= "Reply-To: \"$nombre\" <$emailwebmaster>\r \n";
$headers .= "X-Priority: 5\r \n";
$headers .= "X-MSMail-Priority: High\r \n";
$headers .= "X-Mailer: Just My Server";

$to = "playparty@gmail.com";
$subject = "Formulari inscripció";

// Envio el correu
if (mail($to, $subject, $msg, $headers)){

echo "<br>"
. "<br>"
. "<br>"
. "<br>"
. "<center>"
. "<img src=http://www.playparty.com/info.gif><p>"
. "La teva inscipció s'ha realitzat correctament"
. "";
$cos= "<img src=http://www.playparty.com/ok.jpg>";
$respuesta ="La teva inscripció ha estat rebuda correctament. Proximament t'informarem de com realitzar el pagament!" ;
$correu_desti = $HTTP_POST_VARS["email"];
$sender_name = "Inscripció Play Party 06";
$sender_email = "inscripcions@playpart.com";
$mailheaders = "From: $sender_name <$sender_email>\n";
$mailheaders .= "Reply-To: $sender_email\n\n";

mail($correu_desti,"Inscripció rebuda",$cos . '\n' . $respuesta,$headers);





}
if (!mail($to, $subject, $msg, $mailheaders))
echo "<img src=http://www.titorld.com/play/stop.gif><br>Hi ha hagut un error en la incripció.<br> Torna a provar-ho en uns minuts<br> Si el problema persisteix, envia un e-mail amb totes les teves dades a playparty@gmail.com";
}


?>
</div></td>
<td height="104"></tr>
</table>
</body>
</html>


Por cierto, me olvidé especificarles cual es la funcion mail que no va:

este no llega al remitente

mail($correu_desti,"Inscripció rebuda",$cos . '\n' . $respuesta,$headers);


este es el que si llega al destinatario

if (!mail($to, $subject, $msg, $mailheaders))

8
Visual Basic 6.0 e inferiores / Como Hacer Variable Con Nombre Variable?
« en: Miércoles 8 de Marzo de 2006, 11:02 »
Wenasss, a ver, estoy programando un 4en rayya en VISUAL B 5 y tengo un problema:

- Como puedo modificar el nombre de una variable dependidendo de otra?

Es decir:

if turno= 1 then
a= "rojo"
else
b=  "azul"
end if

y tengo imagenes llamada imgrojo11, imgrojo12, imgazul11, imgazul12,....
por lo k quiero poder poner algo asi como

imga11 ( que vendria a ser --> imgrojo11
imgb11 ( que vendria a ser --> imgazul11

No se si me he explicado, espero que si, un saludo!

9
Visual Basic 6.0 e inferiores / Cuatro En Linia Visual Basic
« en: Martes 7 de Marzo de 2006, 11:28 »
Gracias amigo!

Páginas: [1]