Los foros del Guille

elGuille.hosting: Ofertas de alojamiento
posiblemente los mejores precios
¡¡¡ Ahora con el doble de casi todo !!!

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)

01/feb/2019

Los moderadores, MVP y administradores podrán seguir editando, respondiendo o creando nuevos mensajes

Con idea de que puedan ayudar a responder e ir cerrando mensajes ;-)

  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-2019  - foros.elGuille v1.0.5.3 (23/Mar/2009 14:50 GMT +1)  - (ASP.NET 2.0 v2.0.50727.8800)
 
Usuarios activos: 81 - App. iniciada: 23/02/2019 10:45:05 GMT - La hora GMT del servidor es: 23/02/2019 11:37:23 GMT