Search results

:D im glad i could for a change

i think.. For Each varItem In Me!cboCountry.ItemsSelected strCountry = strCountry & ",'" & Me!cboCountry.column(2).ItemData(varItem) & "'" Next varItem i cant remember if the column count is 0 based so try changin it to 1 before you try anythin else.

i know this doesn't answer your question and to be honest I can't but im sitting in class with absolutely nothing to do so... can't you just do find and replace?

im not an expert and its late so i could be wrong.. im pretty sure its the Forms!SignIn... bit - are u lookin at text fields on another form or on the same form as the code you gave? anyway, i think you should have forms("SignIn").txt... insead of Forms!SignIn if its on the same form you can...

hi. im not that good with access myself but ill try to help. try puttin this code (or similar) in the onlick event of a button or something. ... actually after starting to type it im wondering how efficient it will be .. thats if it works. dim missing_seq_no as integer (not sure if this will...

do you mean by clicking "Queries" and then editing a query in design view or via a form? if you mean by the first then i dont know but i would hide the database wind (the one with the tables and stuff in) on the start up . then the user can't edit the query.

try putting the two if criteria in one if ... so... StrProject = DLookup("Project", "qryExistingEntries", "[Project] = """ & Forms![frmSummarizedActualRsrcData]!Project & """") StrName = DLookup("Name", "qryExistingEntries", "[Name] = """ & Forms![frmSummarizedActualRsrcData]!Name & """") If...

hey crash pie, i made a couple changes to your db.

why am i always so slow?!! - i was right tho .. ish :D

I'm no expert but shouldn't it be: .Selection.Text = DLookup("[FirstName]", "[Add or Delete Employees]", "[TutorID] = " & Forms![Add or Delete a Customer]![TutorID] & """) ?

vba works with pixels (i think - maybe twimp depending on the setting on the form properties) . anyway, the height of line is either being set to 2px or 2 twimp. im not sure if you can make it use cm or inches but try changing the height to 200 and see if you can see the line. *i realise i...

look at the products form

dam too slow... but the code above will do it automatically

i haven't done anything like that before but... after writing that i have done it. if the counting field is in the same table as the record you editing the code will be pretty much the same. 1st change the default value of the [EditNo] - the field holding the count - to -1 this is because it...

change the code to this and it will remove stock for a sale and add it for a refund. i doubt its exactly what you want but you could work out the rest from the code. Private Sub TransactionQuantity_AfterUpdate() InStock = DLookup("QuantityInStock", "tblProducts", "[StockId]=" & [StockId] &...

replace all the code on your Transactions form to this: Option Compare Database Private Sub TransactionQuantity_AfterUpdate() InStock = DLookup("QuantityInStock", "tblProducts", "[StockId]=" & [StockId] & "") SPrice = DLookup("SellingPrice", "tblProducts", "[StockId]=" & [StockId] &...

youre welcome

i do now... look at this

hey sstasiak, i made a few changes. it works how you want it to now, i think. i think the problem you had was down to the users table. no record were showing up because that table is empty. you can add it to the query once you've added some users and it should work.

here you go... and i just realised i cant attach a file. heres the link to it ATCS