FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour O.T. Conectar unidad de red
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
O.T. Conectar unidad de red
Posted: Wed Sep 08, 2010 02:59 PM

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

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 731
Joined: Fri Oct 07, 2005 07:42 AM
Re: O.T. Conectar unidad de red
Posted: Wed Sep 08, 2010 08:37 PM

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.

Saludos

Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: O.T. Conectar unidad de red
Posted: Wed Sep 08, 2010 09:23 PM

claro!
le dejamos todo a windows y nos olvidamos del 'Larga vida al DOS' :)

muchas gracias
saludos

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: O.T. Conectar unidad de red
Posted: Wed Sep 08, 2010 10:09 PM
Hola

Puedes hacerlo desde tu programa

Code (fw): Select all Collapse
NetRedir( <cLocal> 聽 聽, ;
聽 聽 聽 聽 聽 <cServer> 聽 , ;
聽 聽 聽 聽 聽[<cPassword>], ;
聽 聽 聽 聽 聽[<lShowError>] ) --> lSuccess


Code (fw): Select all Collapse
NetRedir( "Z:", "\\SERVER\CARPETA", "Password" , .T. )
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 12:18 AM

Interesante funci贸n
muchas gracias Patricio

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 12:32 AM

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..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 12:35 AM

buena sugerencia
gracias

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 01:07 PM
Para evitar compartir carpetas en el servidor yo lo hago asi:

Code (fw): Select all Collapse
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
Saludos,



Adhemar C.
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 03:34 PM

Patricio...
Donde se puede ver el fuente de la funci贸n NetReDir()??
O en que lib est谩??

Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 04:04 PM
Esteban:

Es de la libreria CT ( catools )

la encuentras en ct\ctnet.c

Code (fw): Select all Collapse
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 );
聽 聽}
}
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 05:42 PM

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...

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: O.T. Conectar unidad de red
Posted: Thu Sep 09, 2010 07:49 PM
Esteban:

incluye en tu aplicaci贸n la libreria

Code (fw): Select all Collapse
C:\xHarbour\lib\ct.lib
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: O.T. Conectar unidad de red
Posted: Fri Sep 10, 2010 01:54 AM

Si eso si...
S贸lo intentaba hacer unas pruebas de compilarla.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: O.T. Conectar unidad de red
Posted: Fri Sep 10, 2010 01:33 PM
Esteban

Baja los fuentes desde este link, se encuentra en la carpeta
Code (fw): Select all Collapse
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
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: O.T. Conectar unidad de red
Posted: Fri Sep 10, 2010 05:32 PM

Patricio...
Muchas gracias.
Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda

Continue the discussion