Hello World!

The age of lurking comes to an end!

I opened a year and a half ago an aquabiking center (Velozeo.com/France), and after a year of looking for the right software to run this place, and after finally ignoring the "access is too hard" opinion, I finally looked into this access thingy 4 months ago.

And it is amazing what we can do with this.

Sooo long story short, I found alot of help in these forums, and as I dwelve deeper and deeper in the access hole, I need to start exchanging with you guys! My database is getting big.

Thanks in advance to all of you and se you around!

Jarod

Hello World!

Copy zipped file and unzip

Hi guys,

Just wondering how easy it is to add a button to a form with a function to copy a zipped file to another location and unzip it?

Cheers,

Paul

Copy zipped file and unzip

Checkboxes Choice..

Hey...
I've got a Form that contains a subform from a query of a table..
That Form limits the contents of the subform (datasheet view) with different things like date period and 4 checkboxes each one hold name of place (Alex,Aswan & Luxor).
SO, what i want to do is that when i check the checkbox of "Alex" the query of the subform show only records for places in "Alex" depending on the (Place) field in the table of the query that contain all places (Alex,Aswan & Luxor) & on un-checking the Alex Checkbox the subform do not show the Alex records..
Same with the Aswan & Luxor checkboxes..
Is there anyway of doing that by VBA ?!

Checkboxes Choice..

Last record in the Table

I have "total" query that finds the last number in a table and it has just one field in the table - so when I create anew record i want to look up the last no then add one and then create a new record. The code works in onw query but not in another - - - any ideas guys?


Dim stDocName As String
Dim stLinkCriteria As String
Dim NewStationeryNo As Double

' ------------------------------find last No

NewNo = DCount("*", "qryStationeryLastNo")

NewStationeryNo = DCount("*", "qryStationeryLastNo") + 1
MsgBox "New no " & NewStationeryNo

Last record in the Table

RegEx in TSQL

Hi guys, I have this function in VB that I used in Access to replace all non-alphanumeric characters, including spaces and anything in brackets.

Code:

---

Public Function charOnly3(inputString As String) As String
Dim RE As Object

Set RE = CreateObject("vbscript.regexp")

RE.Pattern = "\([^)]+\)|[^\w]|_"

RE.Global = True
charOnly3 = RE.Replace(inputString, "")

Set RE = Nothing

End Function

---

Now, I moved to SQL server and I'm writing scripts to do same thing.

How can I use RegEx in TSQL?
Only thing I will do is that function.

RegEx in TSQL

Required help on Lookup fields

HI all,

I am looking for some help on a lookup field. Basically I have a field on a form that is referencing another field, which is all good and it pulls the data through. The only thing is that it does not update the table that the form is built from and I am not sure how to go about having it do this.

So field is this [Employee No].[Column](1). I thought I could do setvalue when I hit save record button, but it just comes up with automation error.

Any help would be appreciated as I have a few fields that have simple lookups in them, which do not store to the table.

Thanks

Required help on Lookup fields

Auto Height of Subform on base of records

Hi All

i have a subform (A) which shows records after an query

i want to set height of subform on base of records as some time query shows 2 records and some time it shows 10 records

how can i set auto height of sub form

pls give me solotion

Auto Height of Subform on base of records