Hola:

Me ha llegado un e-mail de un conocido, por su forma de escribir, a pesar de ser su correo electrónico y me saludo con su nombre, la forma de escribir y color del texto no concuerta con él. Lo he intentado localizar y le respondí al correo:


Si pinchas en el enlace, aparece que introduzca tu correo y contraseña, he puesto uno falso diciento: tu_padre@gmail.com
Contrasñea: No_me_robaras_la_contraseña.

Luego entré otra vez sin insertar nada de nada y entras igualmente a una Web que no pinta nada.

La web que te pide es esta.
http://bombayheightsny.com/documentary/googledrivez/page.html

Elijas el icono que elijas, puedes poner esto tanto en el email como en el password. kdsgfksdghfsd   y ldssldfgjldfgjsdflñ. Entras igualmente.

¿Alguien le ha pasado?

Un cordial saludo.

Hola:
 
Estoy haciendo pruebas con los ejemplos en modo consola bajo Visual Studio Community 2015. Me da error y no encuentro la sulución, es más no entiendo lo que me quiere decir.
 
Modo cliente:
 
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
 
using System.Net; // No olvidar.
using System.Net.Sockets; // No olvidar.
 
namespace Chat_Cliente_UDP
{
    class Program
    {
        private const int listenPort = 11000;
 
        static void Main(string[] args)
        {
            bool done = false;
 
            UdpClient listener = new UdpClient(listenPort);
            IPEndPoint groupEP = new IPEndPoint(IPAddress.Any, listenPort);
 
            try
            {
                while (!done)
                {
                    Console.WriteLine("A la espera de la emisión.");
                    byte[] bytes = listener.Receive(ref groupEP);
 
                    Console.WriteLine("Recibido transmitido desde {0} :\n {1}\n",
                        groupEP.ToString(),
                        Encoding.ASCII.GetString(bytes, 0, bytes.Length));
                }
 
            }
            catch (Exception e)
            {
                Console.WriteLine(e.ToString());
            }
            finally
            {
                listener.Close();
            }
        }
 
        public static int Main()
        {
            Main();
 
            return 0;
        }
    }
 
}

Gravedad    Código    Descripción    Proyecto    Archivo    Línea
Error    CS0017    El programa tiene más de un punto de entrada definido. Compile con /main para especificar el tipo que contiene el punto de entrada.    Chat_Cliente_UDP    c:\users\usuario\documents\visual studio 2015\Projects\Chat_Cliente_UDP\Chat_Cliente_UDP\Program.cs    16


Modo servidor:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
 
using System.Net; // No olvidar.
using System.Net.Sockets; // No olvidar.
 
namespace Chat_Servidor_UDP
{
    class Program
    {
        static void Main(string[] args)
        {
            Socket s = new Socket(AddressFamily.InterNetwork, SocketType.Dgram,
            ProtocolType.Udp);
 
            IPAddress broadcast = IPAddress.Parse("127.0.0.1");
 
            byte[] sendbuf = Encoding.ASCII.GetBytes(args[0]);
            IPEndPoint ep = new IPEndPoint(broadcast, 11000);
 
            s.SendTo(sendbuf, ep);
 
            Console.WriteLine("Mensaje enviado a la dirección de difusión");
        }
    }
}
 

También conerrores.

Esto si que no me lo esperaba a pesar de es un ejemplo de este enlace.

Espero que me ayuden como solucionarlo. Por ahora voy a probarlo en modo local a mismo, luego con otro router lo comunico desde este ordenador a uno portatil en red que tengo en casa.

Espero resolver este problema indicado ahora.

Gracias por las respuestas amigos.

Sigo adelante.

Hola:

En esta Web podemos descargar las librerías del puerto paralelo, son del año vete a saber. Como hobby, recuperamos equipos viejos inclusos portátiles con puerto paralelo. En un PC de sobremesa, hay placas que no te vienen puerto paralelo dentro de la placa, otras si pero no por detrás. Para controlar puerto paralelo integrado en la placa con la librería, aquí hay un tutorial y funciona bien, no para las tarjetas PCI.

Si consigues una tarjeta PCI con puerto paralelo, estas librerís no sirven, te da unpantallazo azul, según me cuentan algunas personas de Internet. La dirección física que te da en la BIOS es para la placa integrada, las que no tienen puerto LTP p puierto paralelo, al poner una tarjeta PCI, si usas la misma dirección es cuando se cuelga Windows, pantalla azul. Así que tienes que poner el que te diga los driver en Adimistrador de dispositivos de la tarjeta PCI.

Tarjeta PIC puerto paralelo:


Librerías para puerto paralelo y código fuente:
http://logix4u.net/parallel-port/26-inpoutx64dll-for-win-xp-64-bit

Tengo Visual Studio Community 2015 para usarlo en 64 bits, momdificar dicha librería, antes que nada, como no se mucho el C++, esoy pescando, he estado mirando archivos por archivos en el código fuente a ver si encuentro alguna parte de cambiar la dirección que yo quiera.

El más largo es este llamado intout32drv.dll.

// inpout32drv.cpp : Defines the entry point for the DLL application.
//
 
#include "stdafx.h"
#include "hwinterfacedrv.h"
#include "resource.h"
#include "conio.h"
#include "stdlib.h" 
 
int inst(LPCTSTR pszDriver);
int start(LPCTSTR pszDriver);
 
//First, lets set the DRIVERNAME depending on our configuraiton.
#define DRIVERNAMEx64 "hwinterfacex64\0"
#define DRIVERNAMEi386 "hwinterface\0"
 
char str[10];
int vv;
 
HANDLE hdriver=NULL;
char path[MAX_PATH];
HINSTANCE hmodule;
SECURITY_ATTRIBUTES sa;
int sysver;
 
int Opendriver(BOOL bX64);
void Closedriver(void);
 
BOOL APIENTRY DllMain( HINSTANCE  hModule, 
					  DWORD  ul_reason_for_call, 
					  LPVOID lpReserved
					  )
{
 
	hmodule = hModule;
	switch(ul_reason_for_call)
	{
	case DLL_PROCESS_ATTACH:
		sysver = SystemVersion();
		if(sysver==2)
		{
			Opendriver(IsXP64Bit());
		}
		break;
	case DLL_PROCESS_DETACH:
		if(sysver==2)
		{
			Closedriver();
		}
		break;
	}
	return TRUE;
}
 
/***********************************************************************/
 
void Closedriver(void)
{
	if (hdriver)
	{
		OutputDebugString("Closing driver...\n");
		CloseHandle(hdriver);
		hdriver=NULL;
	}
}
 
void _stdcall Out32(short PortAddress, short data)
{
 
	switch(sysver)
	{
	case 1:
#ifdef _M_IX86
		_outp( PortAddress,data);	//Will ONLY compile on i386 architecture
#endif
		break;
	case 2:
		unsigned int error;
		DWORD BytesReturned;        
		BYTE Buffer[3];
		unsigned short * pBuffer;
		pBuffer = (unsigned short *)&Buffer[0];
		*pBuffer = LOWORD(PortAddress);
		Buffer[2] = LOBYTE(data);
 
		error = DeviceIoControl(hdriver,
			IOCTL_WRITE_PORT_UCHAR,
			&Buffer,
			3,
			NULL,
			0,
			&BytesReturned,
			NULL);
		break;
	}
 
 
}
 
/*********************************************************************/
 
short _stdcall Inp32(short PortAddress)
{
	BYTE retval(0);
	switch(sysver)
	{
	case 1:
#ifdef _M_IX86
		retval = _inp(PortAddress);
#endif
		return retval;
		break;
	case 2:
		unsigned int error;
		DWORD BytesReturned;
		unsigned char Buffer[3];
		unsigned short * pBuffer;
		pBuffer = (unsigned short *)&Buffer;
		*pBuffer = LOWORD(PortAddress);
		Buffer[2] = 0;
		error = DeviceIoControl(hdriver,
			IOCTL_READ_PORT_UCHAR,
			&Buffer,
			2,
			&Buffer,
			1,
			&BytesReturned,
			NULL);
 
		return((int)Buffer[0]);
 
		break;
	}
	return 0;
}
 
/*********************************************************************/
 
int Opendriver(BOOL bX64)
{
	OutputDebugString("Attempting to open InpOut driver...\n");
 
	char szFileName[MAX_PATH] = {NULL};
	if (bX64)
		strcpy_s(szFileName, MAX_PATH, "\\\\.\\hwinterfacex64");	//We are 64bit...
	else
		strcpy_s(szFileName, MAX_PATH, "\\\\.\\hwinterface");		//We are 32bit...
 
	hdriver = CreateFile(szFileName, 
		GENERIC_READ | GENERIC_WRITE, 
		0, 
		NULL,
		OPEN_EXISTING, 
		FILE_ATTRIBUTE_NORMAL, 
		NULL);
 
	if(hdriver == INVALID_HANDLE_VALUE) 
	{
		if(start(bX64 ? DRIVERNAMEx64 : DRIVERNAMEi386))
		{
			inst(bX64 ? DRIVERNAMEx64 : DRIVERNAMEi386);
			start(bX64 ? DRIVERNAMEx64 : DRIVERNAMEi386);
 
			hdriver = CreateFile(szFileName, 
				GENERIC_READ | GENERIC_WRITE, 
				0, 
				NULL,
				OPEN_EXISTING, 
				FILE_ATTRIBUTE_NORMAL, 
				NULL);
 
			if(hdriver != INVALID_HANDLE_VALUE) 
			{
				OutputDebugString("Successfully opened ");
				OutputDebugString(bX64 ? DRIVERNAMEx64 : DRIVERNAMEi386);
				OutputDebugString(" driver");
				return 0;
			}
		}
		return 1;
	}
	OutputDebugString("Successfully opened ");
	OutputDebugString(bX64 ? DRIVERNAMEx64 : DRIVERNAMEi386);
	OutputDebugString(" driver");
	return 0;
}
 
/***********************************************************************/
int inst(LPCTSTR pszDriver)
{
	char szDriverSys[MAX_PATH];
	strcpy_s(szDriverSys, MAX_PATH, pszDriver);
	strcat_s(szDriverSys, MAX_PATH, ".sys\0");
 
	SC_HANDLE  Mgr;
	SC_HANDLE  Ser;
	GetSystemDirectory(path , sizeof(path));
	HRSRC hResource = FindResource(hmodule, MAKEINTRESOURCE(IDR_BIN1), "bin");
	if(hResource)
	{
		HGLOBAL binGlob = LoadResource(hmodule, hResource);
 
		if(binGlob)
		{
			void *binData = LockResource(binGlob);
 
			if(binData)
			{
				HANDLE file;
				strcat_s(path, sizeof(path), "\\Drivers\\");
				strcat_s(path, sizeof(path), szDriverSys);
 
				file = CreateFile(path,
					GENERIC_WRITE,
					0,
					NULL,
					CREATE_ALWAYS,
					0,
					NULL);
 
				if(file)
				{
					DWORD size, written;
 
					size = SizeofResource(hmodule, hResource);
					WriteFile(file, binData, size, &written, NULL);
					CloseHandle(file);
 
				}
			}
		}
	}
 
	Mgr = OpenSCManager (NULL, NULL,SC_MANAGER_ALL_ACCESS);
	if (Mgr == NULL)
	{							//No permission to create service
		if (GetLastError() == ERROR_ACCESS_DENIED) 
		{
			return 5;  // error access denied
		}
	}	
	else
	{
		char szFullPath[MAX_PATH] = "System32\\Drivers\\\0";
		strcat_s(szFullPath, MAX_PATH, szDriverSys);
		Ser = CreateService (Mgr,                      
			pszDriver,                        
			pszDriver,                        
			SERVICE_ALL_ACCESS,                
			SERVICE_KERNEL_DRIVER,             
			SERVICE_SYSTEM_START,               
			SERVICE_ERROR_NORMAL,               
			szFullPath,  
			NULL,                               
			NULL,                              
			NULL,                               
			NULL,                              
			NULL                               
			);
	}
	CloseServiceHandle(Ser);
	CloseServiceHandle(Mgr);
 
	return 0;
}
/**************************************************************************/
int start(LPCTSTR pszDriver)
{
	SC_HANDLE  Mgr;
	SC_HANDLE  Ser;
 
	Mgr = OpenSCManager (NULL, NULL,SC_MANAGER_ALL_ACCESS);
 
	if (Mgr == NULL)
	{							//No permission to create service
		if (GetLastError() == ERROR_ACCESS_DENIED) 
		{
			Mgr = OpenSCManager (NULL, NULL,GENERIC_READ);
			Ser = OpenService(Mgr,pszDriver,GENERIC_EXECUTE);
			if (Ser)
			{    // we have permission to start the service
				if(!StartService(Ser,0,NULL))
				{
					CloseServiceHandle (Ser);
					return 4; // we could open the service but unable to start
				}
 
			}
 
		}
	}
	else
	{// Successfuly opened Service Manager with full access
		Ser = OpenService(Mgr,pszDriver,GENERIC_EXECUTE);
		if (Ser)
		{
			if(!StartService(Ser,0,NULL))
			{
				CloseServiceHandle (Ser);
				return 3; // opened the Service handle with full access permission, but unable to start
			}
			else
			{
				CloseServiceHandle (Ser);
				return 0;
			}
		}
	}
	return 1;
}

No quiere decir que sea ese precisamente.

¿Alguna ayuda?

Saludos.
Un cordial saludo.

Tutorial diseño de interfaz con Java bajo NetBeans para controlar Arduino desde el puerto serie / USB, odrás encender y apagar un Led, recibir mensajes de textos o comandos desde Arduino.



Ver tutorial.

Un cordial saludo.

Hola:

He estado mirando hacer códigos de Visual C++ .net e incluso crear un Windows Form con Visual Studio Community 2015.

Ver tutorial.

He estado mirando el MFC, ya que muchos lo prefieren más porque es un C++ nativo y trabaja más rápido como indica en esta Web.

https://msdn.microsoft.com/es-es/library/ms228787%28v=vs.90%29.aspx

Con el winAPI es más complicado, este tema no lo tocaré.

Centrándonos en el MFC, hasta para crear un formulario requiere su tiempo, aquí muestra un ejemplo de como hacerlo.



No se nada sobre programación de MFC, y quiero pasar del Visual C++ .net de este código mostrado a partir de la página 45 de este tutorial.

Antes que nada. ¿Hay muchos cambios al programarlo del .net a MFC?

Se trata de leer el puerto serie y enviar datos.

He creado el formulario y no aparece los botones MAximizar, minimizar y cerrar.

¿Cómo se crean?

Un cordial saludos.

Presento tutorial como crear una interfaz con Visual Basic 6 y Arduino como encender y apagar un Led, recibir mensajes de texto desde Arduino de forma por paso a paso, amena y cómoda posible para los iniciados en el mundo de la programación y la electrónica.

Puedes descargar el tutorial en PDF o XPS con ejemplos incluidos.

Ver tutorial.

Un cordial saludos.

PD: Versión VB .net.

Hola:

Mirando aquí y todo,  no me entero de lo que quiero hacer.

Tengo una variable.

string Recibidos;

En su interior se almacena esta cadena.

1=ON 2=ON 3=OFF 4=OFF

Como pueden ver, hay espacios por medio. Por ejemplo, para que me tenga que ejecutar el schitch, necesito lo que indica abajo, no toda la cadena en uno.

switch (comando)
                {
                    case "1=ON":
                        pictureBox1.Image = Properties.Resources.Led_rojo_encendido;
                        Recibidos = "";
                        break;
 
                    case "1=OFF":
                        pictureBox1.Image = Properties.Resources.Led_rojo_apagado;
                        Recibidos = "";
                        break;
 
                    case "2=ON":
                        pictureBox1.Image = Properties.Resources.Led_rojo_encendido;
                        Recibidos = "";
                        break;
 
                    case "2=OFF":
                        pictureBox1.Image = Properties.Resources.Led_rojo_apagado;
                        Recibidos = "";
                        break;
 
                    case "3=ON":
                        pictureBox1.Image = Properties.Resources.Led_rojo_encendido;
                        Recibidos = "";
                        break;
 
                    case "3=OFF":
                        pictureBox1.Image = Properties.Resources.Led_rojo_apagado;
                        Recibidos = "";
                        break;
 
                    case "4=ON":
                        pictureBox1.Image = Properties.Resources.Led_rojo_encendido;
                        Recibidos = "";
                        break;
 
                    case "4=OFF":
                        pictureBox1.Image = Properties.Resources.Led_rojo_apagado;
                        Recibidos = "";
                        break;
                }

¿Qué puedo hacer para que me ejecuta los comandos del switch cuando me llegue en al variable Recibidos una cadena de carácteres?

Cortar. Decirlo es fácil. Algún truco que no complique más el código????????

Bueno, si lo complica no pasa nada, mientras funcione.

Saludos.

Hola amigos y amigas:

Hace un tiempo, gracias a los compañeros del foro he logrado hacer funcionar una intefaz controlando el puerto serie con Visual Basic 6, también hay otros lenguajes como indica en este tutorial aún en desarrollo.

Ver tutorial PDF (27 MB).

Ahora em han pedido mucha gente que haga lo mismo para controlar el puerto paralelo tanto entrada de datos como de salida, es decir, poder ver activados y desactivado las entradas del LPT como encender y apagar Led a su salida.

Hace años que hice un tutorial paso a paso con .net de varios lenguajes pero no de Visual Basic 6.

Ver tutorial puerto paralelo.

Me comentan que hay centros de enseñansas que obliga los profesores a los alumnos usar Visual Basic 6, impresionante que aún se siga usando a pesar de estar en el Visual Basic .net 2015 hoy en día desde hace muchos años. Quieren aprovechar sus máquinas viejas que incorporan aún puerto paralelo, por cierto, tengo un sobre mesa Pentium III a 933 MHz que incluye puerto paralelo, también un portatil viejo bajo XP son dicho puerto. También quiero aprovecharlo

Por eso les pido mucho consejos pro aquí que dominan este lenguaje VB 6 para el control del puerto paralelo.

• ¿Se necesita alguna librería en especial?
  ¿Se puede hacer directamente el control de un Led?
  ¿Se peude controlar directamente una entrada digital?

Todo esos detalles antes de empezar a hacer ejemplos para comprobar como funciona, luego haré un tutorial sobre ello tal como hice con el RS232 y VB 6 tal como indica en este PDF.

Un cordial saludo

Hola.

En estos momentos le estoy escribiendo desde la Raspberry Pi 2. El PC de sobre mesa al iniciar me die este mensje.

Reboot and Select proper Boot device or Insert Boot Media in selected Boot device and press  kEY.

Lo curioso que he puesto el disco duro a una unidad externa para ponerlo a -----usb, me lo detecta Raspberry Pi, leo todos sus archivos.

Puse Ubuntu Live arrancado desde la unidad DVD y arranca bien el PC, muy lento pero funciona. No detecta el disco duro en el sata, reinicié la BIOS, tampoco, heprobado cara ranura sata y nada, si detectalaunidad DVD.

¿Alguna idea?

Saludos.

Hola:



Les presento un tutorial de crear un formulario Windows paso a paso y de forma sencilla en pdf y xps para aquellas personas novel que no sepa crearlo ya que a partir del 2012 cambió el sistema.

Ver tutorial.

Un cordial saludos.