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

Como te avisé, desde el 1 de febrero de 2019

No se podrán escribir nuevos mensajes ni editar los existentes

En breve solo se mostrarán los mensajes con respuestas.
Posiblemente para el 1 de marzo, solamente se mostrarán los que tengan respuestas y estén marcados como respuesta válida.

  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.6.0 (01/Feb/2019 01:35 GMT +1)  - (ASP.NET 2.0 v2.0.50727.8800)
 
La hora GMT del servidor es: 21/04/2019 00:07:36 GMT