Replies

I just tried something and it worked. I went into Control Panel, Display, Setting and changed the setting from default Blue to Olive Green. Called up the form and it display fine, ugly color but read able. Next I changed it back to default blue and it working fine now.

Used “Yes” How do I know if I am using the right dbtable?
‘-=-=-=-=-=-=-=-=-=-
Sub UpdateA
Dim Obe
Dim MyDB
Dim Rst
Dim Rsm

‘On error resume next
Set Dbe = Application.CreateObject(“DAO.DBEngine.36”)
If Err.Number 0 Then
MsgBox Err.Description & “— Some functions may not work correctly” _
& Chr(13) & “Please make sure that DAO 3.6 is installed on this machine”
Exit Sub
End If

‘How do I know if I am looking at dbUserID and not a different table?
Set MyDB = Dbe.Workspaces(0).OpenDatabase(“tabsnasdatabase$edgarMasterCIGARS06copyblank.mdb”)
Set RST = MyDBOpenRecordset(“dbUserID”)
If UserProperties.Find(“sat”).Value = “Yes” Then
cmdCom7_click()
msgbox”com7″
Update5
Else
msgbox”Else”
End if
End if
End Sub

Just tried that and it goes to the Else all the time. It does no run Com7, Update5.

Going to drop this and change to code to use a Forward button instead of trying it this way.

Thanks

The OBE/DBE was a typeo, sorry.

In UpdateA, If the Value of SATS is Yes, then cmdCOm7 will build the reply message that is display on the screen. As it should do in the first pass as the requestor. In Update 5, the SATS is changed from “Yes”, to “Mailed” (I verified this in the database.) Now the Form is sent to the next person for processing. When the Next person/group opens the Form, do their task and gets ready to forward the form to the next group. Its at this stage that Com7 displays again, even if the SATS is not Yes but Mailed in the database.

If UserProperties.Find(“sats”).Value = Yes Then
cmdCom7_click()
Update5
Else
End if
End Sub
‘-=-=-=-=-=-=-=-=-=-

‘****************************************************************
‘* Procedure:
‘* Arguments:
‘* Description: Sends mail to HR Dept. about NEW Employee
‘****************************************************************
Sub cmdCom7_Click()
Item_Reply = False
Set MyFolder = Application.GetNameSpace(“MAPI”).GetDefaultFolder(6)
Set MyItem = MyFolder.Items.Add(“IPM.Note.Security Awareness Communication”)
MyItem.To = Item.UserProperties.Find(“reqby”).Value
MyItem.Subject = “Security Awareness Communication: ” & “” & Item.UserProperties.Find(“jobnum”).Value
myItem.Body = “Keep this form until Security Awareness is completed. Then send the Date and TIme of person to Data Security.”
MyItem.Display
End Sub
‘-=-=-=-=-=-=-=-=-=-

I have a Windows XP in the CD drive and it is set 1st in the boot order. Once I start the computer I can get into the BIOS and change things around using the keyboard. Not sure what the keyboard is set at right now, but I can navigate around. Will check the boot order again just to make sure.

I have not tried using just one dimm, but will try it tonight.

I already gave them a Status Monitor system. Its a VB6 application that they call up and select the Dept they are in. In the status Monitor it shows all Task related to their Dept,

Task number, Date/Time Request, Who Requested it, Status (Submit, Work in Progress, Finished), Who is working on the task and when they started to work on it.

They are just to lazy to open the Status Monitor up.
Ok, thanks for the input..I’ll just tell them it would take to long to design and code.

By filling out the form I capture all the information that I need. That was fine with me, but now the Dept Manager doesn’t want to OPen the form and tab to the section where his group is working on.. Instead, he wants to be informed what is going on just by opening the form.
1. Tech 1 opens the form, goes to the section/tab for his depmartment and enters the date/time, his name – Using a command button – he updates the database.and starts on completing the process.
2. 20 min. later Tech 2 logons into his computer and see’s the message about a new message/form is waiting for processing. Now, just by the process of open the form, a message pops up telling him that Tech 1 has already started to work on the request. – So Tech 2 can just close the request as someone else is already working on the task.
3. 1 hr later Tech 3 logons into his computer, and opens the message/form task. By this time Tech 1 has finished the process, so Tech 3 upon opening the form, has a pop up telling him that the Task has been finished.

Not sure of anything right now. I only got to formatting the hard drive and the mouse did not move before or after I started.

Not sure I understand your question. I am publishing the forms in: Public FodlersIT Forms (folder) as forms.

There will be no forms in the Organizations Forms Library, they are being moved into the Public Folders.

ok, Foot in mouth time.

Charlette: How do I test for a null entry?

Tried this format and it seems to be working: and ((dbtask.group = “M”) or (dbtask.group = “S”))

This seems to be working and so far I see all the informaiton I was expecting. Thanks to everyone for helping on this.

Did some looking around and I think that Outlook VBA Editor is not powerful enough to handle this. I need to see if I can convert this to a VB6 format. As for the ))) or )), I tried both and I still get the same syntax error. I am still looking into the Nulls in all the fields (operator1, txtstatus) as there are some. As for the S&M, the full range of options are C,S,M and the rare blank. The combinations I will be looking for later are:

Report 1: C
Report 2: S
Report 3: SM

Reports 1 & 2 are working, but I have not checked to see if the blank field will make a difference. Report 3: Is my problem child.

What I am going to do is close this message and rebuild Report 3 using VB 6 software, and make the report into a display using datagrid to show the report online
only.

Not sure what you mean by Nulls, that is your right there are some records that are blank but did not think about that before. Will look that up and see how to deal with the nulls.

Thanks.

Getting a syntex error in query expression from “where (dbtask.operator1……)));
Select [dbtask.tasknum], [dbtask.date], [dbtask.sent], [dbtask.Reqby], [dbtask.txtstatus], [dbtask.jobtype], [dbtask.form], [dbtask.operator1] FROM dbtask where (dbtask.operator1 ‘Not Assigned’) and (dbtask.txtstatus ‘Finished’) and (dbtask.group not (In(‘S’,’M”)));

Select [dbtask.tasknum], [dbtask.date], [dbtask.sent], [dbtask.Reqby], [dbtask.txtstatus], [dbtask.jobtype], [dbtask.form], [dbtask.operator1] FROM dbtask where dbtask.operator1 “Not Assigned” and dbtask.txtstatus “Finished” and dbtask.group = “S”

To change the question just a little – I want to be able to select from dbtask.group where it = “S” or “M”.

I know this is a simple question,,,just tired and want to finish this up.