Search results for query: *

Why don't you use a table to store datas ? A table NavyClass looks like : LeftRate RightRate Name YN 1 Yeoman First Class YN 2 Chief Yeoman ... Then get the name by getting directly it from table: Name =...

The ActiveX is a sound player created by a colleague. It works into a lot of applications (MFC, VB, Excel) without any problems. The malfuction appears only in Access. I put the ActiveX on a new form in a new mdb, with same blink result. Is someone has another idea(s) ? What is special when...

I'm using a specific ActiveX (not distributed). And when I insert this ActiveX into a form, all blink in white. Not only the Form, not only Access window, but all screen with others applications, desktop, task bar,... blink in white When I hide the Activex (by placing the properties displog box...

I think 2 Access on 2 computers = 2 licences. Microsoft doesn't know what is charity... Maybe you can use an apache server (with PHP/ASP,etc.) in front that talks with 1 Access license. Or you make directly a copy of Access for those swindler of microsoft.

I have 2 forms/datasheets: * dts1 that displays Table1 with fields : id_tbl1 : primary key * dts2 that displays Table2 with fields - id_tbl2 : primary key - id_tbl1 : reference to Table1 primary key I want that dts2 displays only records selected in dts1, using id_tbl1 fields...

Add a primary key (named id) into your table and use the following query: SELECT a.Compagny, iif(isnull(b.Field1),a.Field1,0) AS Field1, a.Field2, a.Field3, a.Field4 FROM Table1 AS a LEFT JOIN Table1 AS b ON (a.Field1=b.Field1) AND (a.id<>b.id);

You update the SQL request in Query2, and this request takes data from Query2 too ! This cannot works... You have to modify &quot;From Query2&quot; (&quot;From TableX&quot; ?) or the stDocName.

Instead or left(xxx), use strings.left(xxx) Same for right function and all strings functions.

I think jebry solution is false, for the following reason: &quot;WHERE [TblComcode1!LUComcode] Mod 500 = 0&quot; is true if LUComcode=1000 Modulo 500 is true for 500,1000,1500,2000, etc. You can use: UPDATE Table1 SET B = (A-500)/1000 WHERE A LIKE '*500';

In case there are no records in table, i suggest you to use: =Nz(DMax(&quot;[MyIDfieldName]&quot;,&quot;[tblMyTable]&quot;),-1)+1

In the form BeforeUpdate event, check if tblEmployee.EmployeeID is null. In this case display your message and cancel update. That should be something like: Private Sub Form_BeforeUpdate(Cancel As Integer) If IsNull(Me.EmployeeID ) Then MsgBox &quot;Please my message&quot...

This should works, but it miss the double fixed2: DoCmd.RunSQL &quot;CREATE TABLE MyTable (id COUNTER PRIMARY KEY, price FLOAT)&quot;

You must check if user can add new record, and de/activate the possibilities to add new record. See the thread: http://www.tek-tips.com/gviewthread.cfm/lev2/4/lev3/27/pid/705/qid/419238 Copy the functions of the last (actually last...) post into a module. Then in your form OnOpen event, use...

Your query SeqText seems good. But you don't use SeqText ! You don't modify the Q_FinalData query. You can change the query using this: Private Sub Command4_Click() Dim SeqText As String Dim stDocName As String Dim db As Database Dim Query As QueryDef SeqText = &quot;SELECT...

In your form, modify the EmployeeID control properties, in Data tab: Validation Rule => Not Is Null Validation Text => Please enter a value When the validation rule is not respected, then the validation text is displayed.

Bad syntax in &quot;DoCmd.MoveSize (720, 720, 8641, 10081)&quot; When you don't use a method as function (you don't get value returned by function), you must not have parehesis: DoCmd.MoveSize 720, 720, 8641, 10081

This function can help you: Public Function IsFormOpen(FormName As String) As Boolean Dim frm As Form For Each frm In Application.Forms If frm.name = FormName Then IsFormOpen = True Exit Function End If Next frm IsFormOpen = False...

Dates in query must be embrace between # Dim SeqText As String, Sdate As String, Edate As String Sdate = Text2 Edate = Text4 SeqText = &quot;SELECT * FROM Q_Final WHERE DateDone BETWEEN #&quot; + Sdate + &quot;# AND #&quot; + Edate + &quot;#&quot;

Finally I found information to get user permissions for a particulary object - using user groups permissions and specifics user permissions. =========== Source from &quot;Frequently Asked Questions About Microsoft Access Security for Microsoft Access versions 2.0 through 2000&quot; URL =>...

Restore your report when closing: Private Sub Report_Close() DoCmd.Restore End Sub To move/resize the active window you can use the method: DoCmd.MoveSize [right][, down][, width][, height]