Los foros del Guille

Si no encuentras respuesta, puedes buscar en el sitio del Guille

Google
 

dotNetManía + el sitio del Guille:
¡La mejor información de punto NET!
¡Suscríbete ya! y consigue un 10% de descuento

Selecciona el foro y pulsa en mostrar:     Mostrar 
De tu interés (algunos de los avisos publicados)

24/mar/2007
IMPORTANTE Por favor, cuando hagas una consulta, comprueba si te han respondido, y en caso de que la respuesta sea satisfactoria, indicalo pulsando en el botón de que esa respuesta es la correcta. Es lo menos que debes hacer, ya que así más gente sabrá que esa respuesta contestaba a tu duda.
Gracias.

  Foro: .NET VB Cantidad:  Desde:   Hasta:    Aplicar   Responder 
Respuestas a: 58127 - Desbloquear tabla DBF desde Visual Basic.net
IDAsuntoFechaNick 
58127 Desbloquear tabla DBF desde Visual Basic.net10/01/17 15:35wildibust   
Buenos días por favor ayúdeme a desbloquear tablas desde vb.net

busque en Internet encontré este código pero es de de Vb6 por favor ayúdeme a que funcione en Visual basic .net quiero desbloquear una tabla .dbf desde visual basic 2010

Sub desprotege(rutatabla As String)
Dim Bdesp(1) As Byte
' la variable rutatabla lleva una cadena del tipo "C:\Data\bases\mitabla.dbf
Open rutatabla For Binary As #1
Get #1, , Bdesp
Select Case Bdesp(0)
Case 4
MsgBox "está protegido se procede a desproteger"
Bdesp(0) = 3
Case 3
MsgBox "está desprotegido se procede a proteger"
Bdesp(0) = 4
End Select
Put #1, 1, Bdesp
Close #1

End Sub

 
(c) Guillermo 'guille' Som, 2005-2018  - foros.elGuille v1.0.5.3 (23/Mar/2009 14:50 GMT +1)  - (ASP.NET 2.0 v2.0.50727.8784)
 
Usuarios activos: 37 - App. iniciada: 20/08/2018 14:10:27 GMT - La hora GMT del servidor es: 20/08/2018 14:12:55 GMT