Los foros del Guille

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

Google
 

elGuille.hosting: Ofertas de alojamiento


Ofertas de alojamiento
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-2020  - foros.elGuille v1.0.6.1 (17/Jun/2020 11:20 GMT +2)  - (ASP.NET 2.0 v4.0.30319.42000)
 
La hora GMT del servidor es: 25/10/2020 07:15:23 GMT