Visual Basic - !!!Soy Un Tarado¡¡¡Ayuda por favor

Soy novato
non logro poner este dos linea como multiuser o cliente servidor.
Se alquien tienes un corazon grande, me puedes corejir esto codigo.

Ejemplo:
Set MyDB = Workspaces(0).OpenDatabase("NOMINA.mdb") ' Open Database.
Set MyTable = MyDB.OpenRecordset("itemNomina", dbOpenTable)
MyTable.Index = "Cedula"
MyTable.Seek "=", wcedola
MyTable.AddNew
MyTable.Update
MyTable.MoveLast
MyTable.Edit
MyTable.Fields("Campo") = wcampo
MyTable.Update
End If
MyTable.Close
MyDB.Close

Un saludo
Tarado

La verdad es que no entiendo muy bien lo que quieres hacer, pero si es añadir un nuevo registro, si no encuentra la clave de búsqueda, el código puede ser el siguiente:

Set MyDB = Workspaces(0).OpenDatabase("NOMINA.mdb") ' Open Database.
Set MyTable = MyDB.OpenRecordset("itemNomina", dbOpenTable)
MyTable.Index = "Cedula"
MyTable.Seek "=", wcedola
if Mytable.nomatch then
MyTable.AddNew
MyTable.Update
MyTable.MoveLast
MyTable.Edit
MyTable.Fields("Campo") = wcampo
MyTable.Update
End If
MyTable.Close
MyDB.Close

Perdona , pero el codigo no es correcto, le di al boton enviar antes de tiempo. el Codigo es este:

Set MyDB = Workspaces(0).OpenDatabase("NOMINA.mdb") ' Open Database.
Set MyTable = MyDB.OpenRecordset("itemNomina", dbOpenTable)
MyTable.Index = "Cedula"
MyTable.Seek "=", wcedola
if Mytable.nomatch then
MyTable.AddNew
MyTable.Fields("Campo") = wcampo
MyTable.Update
End If
MyTable.Close
MyDB.Close

Hola Inaki
gracias por contestarme, pero quieria ssaber como puedo transformarlo en multi usuario o cliente/servidor.Tengo intendido que uno necesita poner un Lockedit pero no se hacerlo.Esta eras mi pregunta.Estero que me pueda ayudar.
Un saludo
Tarado

Lockedit?. No necesariamente.
En primer lugar, para una base datos que se abre para varios usuarios por defecto, se abre "compartida"; despues se indica si va a ser de solo lectura ("false") .
set midb = workspaces(0).opendatabase("misdatos.mdb",true,false).
por lo general basta con:
set midb = workspaces(0).opendatabase("misdatos.mdb")
Despues viene el "recordset", que tambien varia el modo de abrir, ya que si es solo para ver los datos, lo puedes hacer en modo "lectura"
set rs = midb.openrecordset("mitabla",dbopensnapshot).
El parámetro "lockedit" es un valor que indica si el bloqueo es de tipo "optimista" o "pesimista", que se utiliza cuando se quiere bloquear un registro, lo que no tengo ahora mismo son los posibles valores que soporta pero si te puedo decir que el formato es:
set rs = midb.openrecordset("tabla",modo,lockedit)
y que funciona perfectamente sin él.

HOLAAA
A TODOS
POR LO QUE VEO NO SO LA UNICA CON PROBLEMAS D ESE MODO

HELP ME