No Abre Objeto access MDB en equipo con Win98

Una pregunta muy tonta... ¿el archivo MDB está protegido contra escritura?
(botón derecho del ratón sobre el archivo y ver sus propiedades)

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Weblog de Jorge Serrano
http://weblogs.golemproject.com/jorge/


"amigo" wrote:

Instalé el MDAC 2.8 SP1 y todavia no puede abrir el archivo MDB en
windows
98

:(


"Jorge Serrano [MVP VB]"

escribió
en el mensaje news:
> ¿Has instalado la última versión de MDAC en Win98?.
>
> http://www.microsoft.com/data/
>
> Jorge Serrano Pérez
> Microsoft MVP VB.NET
> PortalVB.com
> http://www.portalvb.com/
> Weblog de Jorge Serrano
> http://weblogs.golemproject.com/jorge/
>
>
> "amigo" wrote:
>
>> Esta es mi funcion y funciona perfectamente en Windows XP, así es que
>> se
>> las
>> dejo, a mí me sirve mucho. solo tengo que descubrir que pasa en otro
>> equipo
>> con Windows 98 que no abr los archivo MDB
>>
>> Public Sub AbrirFormAccess(ByVal sForm As String, ByVal Archivo As
>> String,
>> ByVal tipo As Boolean)
>>
>> Try
>>
>> Dim oAccess As Access.Application
>>
>> Dim oForm As Access.Form
>>
>> Dim oReport As Access.Report
>>
>> Dim sDBPath As String
>>
>> oAccess = New Access.ApplicationClass
>>
>> If Not oAccess.Visible Then oAccess.Visible = True
>>
>> 'sDBPath >> >> oAccess.SysCmd(Action:=Access.AcSysCmdAction.acSysCmdAccessDir)
>>
>> sDBPath = "C:\"
>>
>> sDBPath = sDBPath & Archivo
>>
>> If tipo Then
>>
>> oAccess.OpenCurrentDatabase(filepath:=sDBPath, Exclusive:=False)
>>
>> Else
>>
>> oAccess.OpenAccessProject(filepath:=sDBPath, Exclusive:=False)
>>
>> End If
>>
>> For Each oForm In oAccess.Forms
>>
>> oAccess.DoCmd.Close(ObjectType:=Access.AcObjectType.acForm, _
>>
>> ObjectName:=oForm.Name, _
>>
>> Save:=Access.AcCloseSave.acSaveNo)
>>
>> Next
>>
>> If Not oForm Is Nothing Then
>>
>> System.Runtime.InteropServices.Marshal.ReleaseComObject(oForm)
>>
>> End If
>>
>> oForm = Nothing
>>
>> oAccess.DoCmd.SelectObject(ObjectType:=Access.AcObjectType.acForm, _
>>
>> ObjectName:=sForm, InDatabaseWindow:=True)
>>
>> oAccess.RunCommand(Command:=Access.AcCommand.acCmdAppMaximize)
>>
>> oAccess.DoCmd.OpenForm(FormName:=sForm,
>> View:=Access.AcView.acViewNormal)
>>
>> oAccess.DoCmd.Maximize()
>>
>> oAccess.CommandBars("Menu Bar").Enabled = False
>>
>> If Not oAccess.UserControl Then oAccess.UserControl = True
>>
>> System.Runtime.InteropServices.Marshal.ReleaseComObject(oAccess)
>>
>> oReport = Nothing
>>
>> oAccess = Nothing
>>
>> Catch ex As Exception
>>
>> MsgBox(ex.InnerException.ToString & ex.Message)
>>
>> Finally
>>
>> End Try
>>
>> End Sub
>>
>> "amigo" escribió en el mensaje
>> news:%
>> > Hola amigos:
>> > Tengo una aplicacion que usa un metodo que permite abrir un
>> > formulario
>> > access, yo uso Windows XP y no da ningun problema pero cuando lo
>> > instalo
>> > en otros equipos conWindows 98 SE , no permite abrir objetos acces
>> > MDB
>> > ,
>> > aunque sin embargo me permite abrir Proyectos Access .ADP
>> > y me permite abrir formularios. Al parecer me falta algo cuando abro
>> > objetos MDB, puesto que no encuntra el archivo MDB y por lo tanto no
>> > se
>> > instancia:
>> > el mensaje de error:
>> > "Referencia Objeto no establecida como instancia de un objeto"
>> >
>> > ¿Como puedo depurar el error en esa otra maquina queno tiene VS.NET?
>> > gracias, se despide cordialmente,
>> >
>> > amigo
>> >
>>
>>
>>

no, porque este archivo lo abro directamente a traves de explorador de
windows y no a traves de mi aplicacion y se abre sin problemas.


"Jorge Serrano [MVP VB]"

escribió en el mensaje
news:

Una pregunta muy tonta... ¿el archivo MDB está protegido contra
escritura?
(botón derecho del ratón sobre el archivo y ver sus propiedades)

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Weblog de Jorge Serrano
http://weblogs.golemproject.com/jorge/


"amigo" wrote:

Instalé el MDAC 2.8 SP1 y todavia no puede abrir el archivo MDB en
windows
98

:(


"Jorge Serrano [MVP VB]"

escribió
en el mensaje news:
> ¿Has instalado la última versión de MDAC en Win98?.
>
> http://www.microsoft.com/data/
>
> Jorge Serrano Pérez
> Microsoft MVP VB.NET
> PortalVB.com
> http://www.portalvb.com/
> Weblog de Jorge Serrano
> http://weblogs.golemproject.com/jorge/
>
>
> "amigo" wrote:
>
>> Esta es mi funcion y funciona perfectamente en Windows XP, así es que
>> se
>> las
>> dejo, a mí me sirve mucho. solo tengo que descubrir que pasa en otro
>> equipo
>> con Windows 98 que no abr los archivo MDB
>>
>> Public Sub AbrirFormAccess(ByVal sForm As String, ByVal Archivo As
>> String,
>> ByVal tipo As Boolean)
>>
>> Try
>>
>> Dim oAccess As Access.Application
>>
>> Dim oForm As Access.Form
>>
>> Dim oReport As Access.Report
>>
>> Dim sDBPath As String
>>
>> oAccess = New Access.ApplicationClass
>>
>> If Not oAccess.Visible Then oAccess.Visible = True
>>
>> 'sDBPath >>> >> oAccess.SysCmd(Action:=Access.AcSysCmdAction.acSysCmdAccessDir)
>>
>> sDBPath = "C:\"
>>
>> sDBPath = sDBPath & Archivo
>>
>> If tipo Then
>>
>> oAccess.OpenCurrentDatabase(filepath:=sDBPath, Exclusive:=False)
>>
>> Else
>>
>> oAccess.OpenAccessProject(filepath:=sDBPath, Exclusive:=False)
>>
>> End If
>>
>> For Each oForm In oAccess.Forms
>>
>> oAccess.DoCmd.Close(ObjectType:=Access.AcObjectType.acForm, _
>>
>> ObjectName:=oForm.Name, _
>>
>> Save:=Access.AcCloseSave.acSaveNo)
>>
>> Next
>>
>> If Not oForm Is Nothing Then
>>
>> System.Runtime.InteropServices.Marshal.ReleaseComObject(oForm)
>>
>> End If
>>
>> oForm = Nothing
>>
>> oAccess.DoCmd.SelectObject(ObjectType:=Access.AcObjectType.acForm, _
>>
>> ObjectName:=sForm, InDatabaseWindow:=True)
>>
>> oAccess.RunCommand(Command:=Access.AcCommand.acCmdAppMaximize)
>>
>> oAccess.DoCmd.OpenForm(FormName:=sForm,
>> View:=Access.AcView.acViewNormal)
>>
>> oAccess.DoCmd.Maximize()
>>
>> oAccess.CommandBars("Menu Bar").Enabled = False
>>
>> If Not oAccess.UserControl Then oAccess.UserControl = True
>>
>> System.Runtime.InteropServices.Marshal.ReleaseComObject(oAccess)
>>
>> oReport = Nothing
>>
>> oAccess = Nothing
>>
>> Catch ex As Exception
>>
>> MsgBox(ex.InnerException.ToString & ex.Message)
>>
>> Finally
>>
>> End Try
>>
>> End Sub
>>
>> "amigo" escribió en el mensaje
>> news:%
>> > Hola amigos:
>> > Tengo una aplicacion que usa un metodo que permite abrir un
>> > formulario
>> > access, yo uso Windows XP y no da ningun problema pero cuando lo
>> > instalo
>> > en otros equipos conWindows 98 SE , no permite abrir objetos acces
>> > MDB
>> > ,
>> > aunque sin embargo me permite abrir Proyectos Access .ADP
>> > y me permite abrir formularios. Al parecer me falta algo cuando
>> > abro
>> > objetos MDB, puesto que no encuntra el archivo MDB y por lo tanto
>> > no se
>> > instancia:
>> > el mensaje de error:
>> > "Referencia Objeto no establecida como instancia de un objeto"
>> >
>> > ¿Como puedo depurar el error en esa otra maquina queno tiene
>> > VS.NET?
>> > gracias, se despide cordialmente,
>> >
>> > amigo
>> >
>>
>>
>>