Posts

Showing posts from July, 2011

Modify font and color properties of unread/read documents in Notes 8.5.2

  By default lotus note client 8.5.2 defined 2 modes of display for unread mail (File > Preferences... > Fonts and Colors ) in unread mail indication are Bold Black Text , and Plain Red text. You can just switch between these two mode.  How could we set it in to bold with red or any other color?

Generate Forms with fields without any development knowledge.

   I have been asked by my team to have a very quick an online survey base on current deployment of the web page(Joomla base website). Before all, I have known that there have hug components development in Joomla which some are commercial and some are open to public used. Finally I come across  ckform  which seems fulfill my need and also free for public used. They have develop and fully documented.      You can download the components, modules, and plugin from their original website or used as my link. 1.   CKForms component 1.3.5 (build 1) 2.   CKForms plug-in 1.3.4 (build 1) 3.   CKForms Data plug-in 1.3.4 (build 1) 4.   CKForms module 1.3.4 (build 1) 5.   Manual 1.3.4 (English)

Use NotInList Event to Add a Record to Combo Box

    Some time we would like to add new items into Combo Box while it does not previously exists. There are severals ways to do that : 1. Using Code to Add a Record to a Table:  With this you need to set LimitToList property of the combo box  to Yes and writing into its  OnNotInList event as below Private Sub CustomerID_NotInList(NewData As String, _             Response As Integer) Dim Db As DAO.Database Dim Rs As DAO.Recordset Dim Msg As String Dim NewID As String On Error GoTo Err_CustomerID_NotInList     If NewData = "" Then Exit Sub     Msg = "'" & NewData & "' is not in the list." & vbCr & vbCr & "Do you want to add it?"     If MsgBox(Msg, vbQuestion + vbYesNo) = vbNo Then         Response = acDataErrContinue         MsgBox "Please try again."     Else  ...

Reset page numbers for each group in a report

Sometime you would need to reset page numbering on your Ms Reporting on each group. To do so it's needed to add a few line of code in the sub as sample below: Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer) 'Set page number to 1 when a new group starts. Page = 1 End Sub And then  Set the   ForceNewPage   property of the Country Footer section to   After Section . To do this, follow these steps: In Design view, right-click   The Group Footer , and then click  Properties . In the  Section: GroupFooter1  dialog box, click the  Format  tab. In the  Force New Page  box, click  After Section , and then close the  Section: GroupFooter1  dialog box. See Original post at  841779   Or 209215