SoloCodigo

Bases de Datos => MS Access => Mensaje iniciado por: Isaacgm78 en Viernes 3 de Junio de 2005, 19:27

Título: Ayuda Con Codigo
Publicado por: Isaacgm78 en Viernes 3 de Junio de 2005, 19:27
Hola comunidad como estamos????
bueno primeramente es mi primera ves por estos rumbos y os saludo a todos por dicha comunidad a la ves ando buscando ayuda para cierto codigo que me funciona perfectamente en MSAccess 97 and MSaccess XP, pero el problema es que cuando vengo a usar la misma DataBase en MSAccess 2003 no me funciona  :(  ,  el codigo es el siquiente la cual estoy usando un MODULE para ello :



Código: Text
  1. '------------------------------------------------------------------------
  2. ' FUNCTION: GetOrderNumber
  3. '
  4. ' PURPOSE: Retrieves the next Order Number from the Settings table
  5. '------------------------------------------------------------------------
  6. Function GetOrderNumber() As Long
  7.     Dim db As Database
  8.     Dim t As Table
  9.     Dim num As Long
  10.    
  11.     Set db = OpenDatabase("\\Malaka\Service\SK_Table.mdb")
  12.     Set t = db.OpenTable("Settings")
  13.  
  14.     t.MoveFirst
  15.     num = t.OrderNumber
  16.     t.Edit
  17.     t.OrderNumber = t.OrderNumber + 1
  18.     t.Update
  19.  
  20.     t.close
  21.     GetOrderNumber = num
  22. End Function
  23.  


NOTA : este codigo fue elaborado por un amigo mio hace tiempo atras todas las referencias estan colocadas tando como en 97, XP y 2003..
Pero no funciona correctamente en 2003 en esta area :

    Set db = OpenDatabase("\\Malaka\Service\SK_Table.mdb")

la verdad apreciaria cualquier ayuda en este caso y si hay alguna mejor manera de hacerlo seria mucho mejor..


Gracias de ante mano :kicking:

Isaac
Título: Re: Ayuda Con Codigo
Publicado por: RadicalEd en Sábado 4 de Junio de 2005, 18:05
Cita de: "Isaacgm78"
Pero no funciona correctamente en 2003 en esta area :

    Set db = OpenDatabase("\\Malaka\Service\SK_Table.mdb")

 
Esta es la ruta no?, mira a ver si existen esos directorios y esta la DB en ese lugar, y que ese sea el nombre de la DB, sino es asi, 'tonces busca el archivo y copia el directorio donde se encuentra.

Ojala te sirva.
Chao