Page 1 of 1
O.T. Conectar unidad de red
Posted:
Wed Sep 08, 2010 2:59 pm
by MarioG
Gente:
En un PC cliente tengo asignada un letra de unidad para conectar a un Servidor semi-dedicado.
Ocurre que siempre que arranca Windows (siempre se enciende luego del servidor semi-dedicado), la unidad de red aparece desconectada. Por lo que tengo que abrir la MiPC (o Equipo) y desde alli habilitarla. Como tengo instalados XP desantendidos, no se si esto es una particularidad de estos Windows o de todos.
Se puede hacer algo para que se conecte con el arranque, sin intervención del usuario?
muchas gracias
Re: O.T. Conectar unidad de red
Posted:
Wed Sep 08, 2010 8:37 pm
by thefull
Ahora de memoria, creo que era, desde la linea de comandos;
net use z: //192.168.1.1 /persistent:yes
Mira el comando net use.
Re: O.T. Conectar unidad de red
Posted:
Wed Sep 08, 2010 9:23 pm
by MarioG
claro!
le dejamos todo a windows y nos olvidamos del 'Larga vida al DOS'
muchas gracias
saludos
Re: O.T. Conectar unidad de red
Posted:
Wed Sep 08, 2010 10:09 pm
by Patricio Avalos Aguirre
Hola
Puedes hacerlo desde tu programa
- Code: Select all Expand view
NetRedir( <cLocal> , ;
<cServer> , ;
[<cPassword>], ;
[<lShowError>] ) --> lSuccess
- Code: Select all Expand view
NetRedir( "Z:", "\\SERVER\CARPETA", "Password" , .T. )
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 12:18 am
by MarioG
Interesante función
muchas gracias Patricio
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 12:32 am
by sysctrl2
yo hacia lo mismo antes, usaba unidades logicas, pero decisti de ello,
es mas facil usar la ruta del servidor y te evitas esos problemas:
ejemplo:
USE \\SERVER\C\DATOS\CLIENTES.DBF NEW
saludos..
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 12:35 am
by MarioG
buena sugerencia
gracias
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 1:07 pm
by acuellar
Para evitar compartir carpetas en el servidor yo lo hago asi:
- Code: Select all Expand view
WaitRun("Net use \\168.1.1.3\D$ clave /user:usuario",0) //El usuario tiene que tener permiso de administrador
SET DEFAULT TO \\168.1.1.3\D$\SISTEMAS
*ES RECOMENDABLE NO COLOCAR LAS APLICACIONES EN UNIDAD C:
*AL SALIR
WinRun("Net use \\168.1.1.3\D$ /delete",0)
Asi no tenemos unidades de RED o MAPEADA que son accesible a los usuarios.
Saludos,
Adhemar
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 3:34 pm
by jrestojeda
Patricio...
Donde se puede ver el fuente de la función NetReDir()??
O en que lib está??
Saludos, Esteban.
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 4:04 pm
by Patricio Avalos Aguirre
Esteban:
Es de la libreria CT ( catools )
la encuentras en
ct\ctnet.c- Code: Select all Expand view
HB_FUNC( NETREDIR )
{
DWORD dwResult;
LPTSTR lpLocalDev = HB_TCHAR_CONVTO( hb_parcx( 1 ) );
LPTSTR lpSharedRes = HB_TCHAR_CONVTO( hb_parcx( 2 ) );
LPTSTR lpPassword = HB_TCHAR_CONVTO( hb_parcx( 3 ) );
BOOL bShowError = ( ISLOG( 4 ) ? hb_parl( 4 ) : FALSE );
if( hb_pcount() >= 3 && ISCHAR( 3 ) )
{
dwResult = WNetAddConnection( lpSharedRes, lpPassword, lpLocalDev );
}
else
{
dwResult = WNetAddConnection( lpSharedRes, NULL, lpLocalDev );
}
if( dwResult == NO_ERROR )
{
hb_retl( TRUE );
}
else
{
if( bShowError )
{
char szCommand[80];
hb_snprintf( szCommand, 80, "NETREDIR( \"%s\", \"%s\", \"%s\" )",
hb_parcx( 1 ), hb_parcx( 2 ), hb_parcx( 3 ) );
WNetErrorHandler( dwResult, szCommand );
}
hb_retl( FALSE );
}
}
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 5:42 pm
by jrestojeda
Patricio...
Cuales son las cabeceras de esa función?
Que Includes hay que poner?
Cuando la compilo me faltan estas tres funciones:
_HB_TCHAR_CONVTO
_hb_snprintf
_WNetErrorHandler
Saludos...
Re: O.T. Conectar unidad de red
Posted:
Thu Sep 09, 2010 7:49 pm
by Patricio Avalos Aguirre
Esteban:
incluye en tu aplicación la libreria
- Code: Select all Expand view
C:\xHarbour\lib\ct.lib
Re: O.T. Conectar unidad de red
Posted:
Fri Sep 10, 2010 1:54 am
by jrestojeda
Si eso si...
Sólo intentaba hacer unas pruebas de compilarla.
Re: O.T. Conectar unidad de red
Posted:
Fri Sep 10, 2010 1:33 pm
by Patricio Avalos Aguirre
Esteban
Baja los fuentes desde este link, se encuentra en la carpeta
- Code: Select all Expand view
source\ct\ctnet.C
ahi estan todas las funciones de red y encabezados.
http://sourceforge.net/projects/xharbour/files/Source%20distribution/1.20.01/xharbour-1.2.1.src.zip/download
Re: O.T. Conectar unidad de red
Posted:
Fri Sep 10, 2010 5:32 pm
by jrestojeda
Patricio...
Muchas gracias.
Saludos, Esteban.