Neil,

If you're willing to share, I would appreciate knowing how you 
process the inventory.  A friend asked to to work with him on some 
automation for his sister's restaurants and any ideas would be 
helpful.

Thanks,
John

PS: If the code is larger than a couple of MB, let me know and I'll 
set up an FTP site for you to upload.

--- In [EMAIL PROTECTED], "neil otway" <[EMAIL PROTECTED]> wrote:
>
> Edgard
> 
> There is a high chance that you have 'Allow Zero Length' set to No 
or
> 'Required' set to Yes
> in the field properties of your access table. Either will create the
> 'quirk' you refer to.
> 
> I have a working client / server application which I have written 
for
> a small retail store I own.
> Using a symbol pdt 8037(winCE 3.0 i think) which I use to do
> stocktake. I can scan a barcode
> and get a return of the price and amount which should be on the
> shelves and in the storeroom etc.
> Also I can update from the pda if there is any changes (i.e more
> stolen stock :( )
> 
> The server will handle as many PDA's as you have. We have 4 in total
> and all of them can be running
> together.
> 
> The server is written in Visual Basic 6, the client in nsbasic 7 and
> using MYSQL for the db, but using access
> is only a matter on changing 1 line of code.
> 
> It is far from finished, but it is operational, and if you think it
> could help you, then I am more than happy
> to share it.
> 
> Neil
> 
> 
> --- In [EMAIL PROTECTED], "elriba75" <edgard.riba@> wrote:
> >
> > Hi,
> > 
> > Thanks Tim and Bob.
> > 
> > I ended up with this function:
> > 
> > Sub tUB(BYREF theUpdate,theField,theName)
> > Dim s
> >    If IsNumeric(theField) Then
> >       If theField Then
> >          s = theName & "=" & CStr(theField)
> >       Else
> >          s = ""
> >       End If
> >    Else
> >       If theField <> "" Then
> >          s = theName & "=""" & theField & """"
> >       Else
> >          s = ""
> >       End If
> >    End If
> >    If s <> "" Then
> >       If theUpdate <> "" Then
> >          theUpdate = theUpdate & "," & s
> >       Else
> >          theUpdate = s
> >       End If
> >    End If
> > End Sub
> > 
> > I'm updating an Access database on the desktop.   What I'm doing 
is
> > using the Winsock control to send an SQL statement to a "Base 
Station"
> > application on the desktop.     It is working, except for a few 
quirks
> > I've yet to solve.
> > 
> > One of the quirks is that the UPDATE statement fails if it has 
one of
> > the fields as an empty string.    For example:   UPDATE Customers 
SET
> > CustomerID = 'ALFKI',CompanyName = '' WHERE CustomerID = 'ALFKI',
> > fails because "CompanyName" is to be set to an empty string.
> > 
> > I'm thinking this is an Access limitation, because I think most
> > databases will accept such a statement.
> > 
> > Thanks again,
> > Edgard L. Riba
> >
>



--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"nsb-ce" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to