' Create a new socket
Dim lsocketID As Long
lsocketID = Socket(AF_INET, SOCK_STREAM, 0)
If lsocketID = SOCKET_ERROR Then
Err.Raise GENERAL_ERROR, "WinsockOpenTheSocket", "Unable to create the socket!"
End If
MsgBox "Here is a SocketID" & " = " & lsocketID
That...
I'm looking for a VBA Winsock consultant to assist me on the new project I will be doing in January 2024, it's not for Free but payable at a negotiated price, I will appreciate if someone can direct me to seasoned MS ACCESS VBA /JSON programmers.
Well I have finally given up the query below changes the date to 22/11/1900 fortunately we had just captured 30 invoices and we had printed the hard copies , I had to go into studio management to correct the dates again. This means that I have to stick with the original code below though...
Here is my final try:
Dim db As DAO.Database
Dim strSQL As String
Set db = CurrentDb
strSQL = "SELECT * FROM [tblCustomerInvoice] WHERE tblCustomerInvoice.InvoiceID)= & [Forms]![frmCustomerInvoice]![CboShipDateChange]"
strSQL = "UPDATE tblCustomerInvoice SET tblCustomerInvoice.ShipDate = #" &...
What if I do it this way :
UPDATE tblCustomerInvoice SET tblCustomerInvoice.ShipDate = #"Format(( [Forms]![frmCustomerInvoice]![txtChangeShipeDate]),"YYYY\/MM\/DD")&"#
Sorry I'm just guessing here, and so corrections will be required!
The date is 2 November 2023 English date not American
Its just the code below where I'm confusing myself:
UPDATE tblCustomerInvoice SET tblCustomerInvoice.ShipDate = #11/02/2023#
I'm currently using cloud database, so to improve the speed I need to use a pass-through query from MS Access so that I can deal with the server directly. I'm trying to open the record source in VBA, that is where I'm getting it wrong. See below why the code is not changing the date.
Dim db As...
Fortunately the code below has worked as required:
DoCmd.OpenReport "RptPosReceipts", acViewPreview, "", "", acNormal
DoCmd.PrintOut
DoCmd.Close acReport, "RptPosReceipts"
The error is occurring immediately after preview which is visible to everyone ,the error is wrong property assignment. Here I do not want to see the preview mode but direct printing
Dear Experts!
Sorry once again!
I want to have a POS receipt sent directly to the printer after selecting the receipt number in the combo box using the after events property, but it is giving me an error. I do not want to preview anything here , below is my VBA Code.
Private Sub...
Maybe I’m missing something here, I have been following the rules listed below to implement my cloud-based database SQL Server, I can confirm the rules listed below have sorted out all my reports, they pull data almost instantly BUT not data entry forms, the parent and child forms have these...