Los foros del Guille

elGuille.hosting: La oferta recomendada:
.NET 2.0, SQL Server, 1200MB, 10GB transf. por 9.95 Euros al mes

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

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

06/jun/2006
REPETIMOS: Por favor, por favor, por favor... no repitas mensajes en varios foros.
Lo único que consigues con ello es confundir a la gente y dar más trabajo a los que responden mensajes. 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-2017  - foros.elGuille v1.0.5.3 (23/Mar/2009 14:50 GMT +1)  - (ASP.NET 2.0 v2.0.50727.8762)
 
Usuarios activos: 55 - App. iniciada: 18/10/2017 12:09:21 GMT - La hora GMT del servidor es: 18/10/2017 13:11:13 GMT