Search results

The CIA have a program created in access, I can't see the design coz um not authorized to do so, i just wanna break the security of the program so that i can see all the intellectual property used in forms and queries...can someone help?

If you only merge one record and don't actually need to create a merged document is to export the single record as delimited file called mysource.txt which is the word documents record source. Then open the word document with Docmd.FollowHyperlink "PathToWordDoc" This will automatically cause...

Let's have a sample to play with (Access 97 please for the poor luddites :) )

it is impolite to post the same question in more than one forum. Responded on this thread... http://www.access-programmers.co.uk/forums/showthread.php?s=&threadid=53985

You could either send the email directly from access using the SendObject command: http://www.access-programmers.co.uk/forums/showthread.php?s=&threadid=52307&highlight=email+loop or alternatively, if you just want to output the names and addresses to Outlook and then use outlook, you could...

You don't need to check the Dirty property, the before update event is only triggered for dirty records. Also the setting of the datestamp to Now() doesn't seem to relate to whether the record is new or not, therefore it should be outside the conditional actions as follows: Private Sub...

Seeing as there are 60 seconds in a minute and 60 minutes in an hour it seems that dividing the source by 60 will leave you with the conversion complete. TheTime: [YourTimeField]/60

Given that raskews proposals are right and your database thinks you're talking hours and minutes not minutes and seconds I've used a TimeValue function to create the time, see the following SQL.([TheTime] = YourField SELECT Sum(TimeValue("0:" & CStr(Mid([TheTime],1,2)) & ":" &...

Set your charts recordsource to look at a query instead of a table, you can add criteria to preselect which values are presented in the graph.

I use this function: Public Function Add2Source(tbl As String, fld2update As String, NewData As String) As Integer 'Adds record to the list if not already present 'This only works if there is just one field to update.... Dim strMessage As String Dim dbs As Database Dim RstTypes As Recordset...

from help: If the user clicks Cancel, the function returns a zero-length string (""). Use an IF statement to catch the error and re-run the list box. You must also put an exit option in to allow the user to get out of the loop

When I do Me.Cert1. ( It shud pull up all the valid properties that goes along with this) , in my case, it pulls up just "value"alone. So does mine, I just type 'Visible' and it is accepted. Look at the attached sample report 'THIS_ONE' in the attached.

I'm confused, how can you have a control bound to field(column) that does not exist in the datasource, by definition the field will be unbound won't it? That's why you are being asked to provide the parameter(field) value. What are you trying to do?

Funny that, worked on my main report and when I inserted the same into a subreport. Try: Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Dim blnVisible as Boolean If Me.Description = "CRATE" Then blnVisible = False Else blnVisible = True End if Me.ItemNumber.Visible =...

Try this... Public Sub DeleteSomeRows() Dim lngFirstBlankRow As Long lngFirstBlankRow = Range("A1").End(xlDown).Row + 1 Rows(lngFirstBlankRow & ":65536").Delete End Sub

Glad we've set the level now. Two tramps sitting on the wall of mansion in the dead of winter, shivering with cold and the wind biting at their faces. "I'm starving" says the older tramp. I know how we'll get some food and walks off. The younger tramp follows. Into a field they go and the...

I seemed to have sussed Media Player out, take a look at the form I created here...

if you are only playing wav files, there are 2 parts to playing a .WAV file in Access or VB 1. Need to declare the sndPlaySound function in the winmm.dll file. 2. Call the sndPlaySound function as shown below. ' ----------------------- Put this in a Module ------------- Declare Function...

Can we establish where the last row of the data set sits (e.g. if you go down to the bottom of the range and hit Ctrl + the up arrow does this go to the last record. if so we can use that row as a reference and delete all rows below it.

Use an function in the detail format event as follows, expanding this theory will allow you to hide/show for each variation. Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) If Me.KeyID > 1 Then Me.KeyID.Visible = False Else Me.KeyID.Visible = True End If End Sub