tell amgr run "資料庫路徑" '代理程式名稱'
資料庫路徑：用雙引號包起來。
代理程式名稱：不能用雙引號，如果有()，也不能加上去。
2014年1月27日 星期一
2013年3月18日 星期一
Domino Server ：DominoCompleteDocType
Domino Server中預設DocType為【<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">】，可以透過修改notes.ini裡的DominoCompleteDocType來變更設定。
0 - <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
1 - <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
2 - <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
在Domino 7.02後可以利用欄位【$$HTMLFrontMatter】來指定DocType。
0 - <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
1 - <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
2 - <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
在Domino 7.02後可以利用欄位【$$HTMLFrontMatter】來指定DocType。
2012年12月23日 星期日
Lotus Script 建立記事本並寫入資料
以下程式碼在Notes 的環境下，使用Lotus Script來建立一個紀事本並寫入資料。
此版本為基本的建立新的紀事本並寫入資料，如果要運行較複雜的做法，例如：判斷路徑的資料夾存不存在，如果不存在是否要建立新的或報錯，如果有同樣的名字，是否要開啟記事本把資料寫入到最後一行或覆寫等等，等下次有時間在來PO文。
Sub Initialize
On Error Goto ErrorHandle
Dim session As NotesSession
Dim stream As NotesStream
Dim pathname As String
Set session = New NotesSession
Set stream = session.CreateStream
'設定路徑
pathname = "D:\" & "Test.txt"
'建立一個文件流並關聯上所指定路徑之檔案名稱，檔案不存在，系統會新建一個檔案。
If Not stream.Open(pathname, "ASCII") Then
Messagebox pathname,, "Open failed"
Exit Sub
End If
'當Bytes為0時，代表檔案為新檔案，反之，不等於0就是代表檔案原本已存在而且有內容。
If stream.Bytes <> 0 Then
Messagebox pathname,, "File already exists and has content"
Exit Sub
End If
'寫入資料
Call stream.WriteText("Test_Line_1", EOL_CRLF)
Call stream.WriteText("Test_Line_2", EOL_CRLF)
Call stream.WriteText("Test_Line_3", EOL_CRLF)
Call stream.WriteText("Test_Line_4", EOL_CRLF)
Call stream.WriteText("Test_Line_5", EOL_CRLF)
Call stream.Close
Exit Sub
ErrorHandle:
Msgbox ("ErrorPlace : 【Agent/(writeToText)/Initialize】, Error is : " & Str(Err) & " , ErrCode is : " & Error$ & " , " & "Error line is : " & Cstr(Erl))
Exit Sub
End Sub
2012年12月9日 星期日
匯出Excel【Web】
匯出Excel的方式有很多，以下的範例只是其中之一，之後會慢慢的放上來。
Sub Initialize
On Error Goto CreateExcel
Dim ss As New notessession
Dim db As notesdatabase
Set db = ss.CurrentDatabase
Dim docmain As NotesDocument
Dim MainView As NotesView
'資料來源的視界
Set MainView = db.GetView("DataView")
Print |Content-Type:application/vnd.ms-excel|
Print |<HTML><HEAD><TITLE>Excel from Web</TITLE></HEAD><BODY> <TABLE>|
Print |<tr>|
Print |<td style="border:1px solid gray;width:200px">標頭</td>|
Print |<td style="border:1px solid gray;width:200px">標頭</td>|
Print |<td style="border:1px solid gray;width:200px">標頭</td>|
Print |<td style="border:1px solid gray;width:200px">標頭</td>|
Print |<td style="border:1px solid gray;width:200px">標頭</td>|
Print |</tr>|
'從視界裡一筆一筆將文件取出並匯出其所需資料。
Set docmain = MainView.GetFirstDocument
While Not(docmain Is Nothing)
For j=0 To Ubound(arr1)
Print |<tr>|
Print |<td style="border:1px solid gray;width:200px">| + docmain.GetItemValue("Data")(0) + |</td>|
Print |<td style="border:1px solid gray;width:200px">| + docmain.GetItemValue("Data")(0) + |</td>|
Print |<td style="border:1px solid gray;width:200px">| + docmain.GetItemValue("Data")(0) + |</td>|
Print |<td style="border:1px solid gray;width:200px">| + docmain.GetItemValue("Data")(0) + |</td>|
Print |<td style="border:1px solid gray;width:200px">| + docmain.GetItemValue("Data")(0) + |</td>|
Print |</tr>|
Next
Set docmain= MainView.GetNextDocument(docmain)
Wend
Print |</TABLE></BODY></HTML>|
CreateExcel:
Msgbox Cstr(Erl()) + "&" + Error$,Str(Err)
Exit Sub
End Sub
2012年11月1日 星期四
Domino Notes Client 安裝、設定
1. 歡迎安裝畫面，請選擇【下一步】進行安裝。
2. 請點選【接受】並選擇【下一步】進行安裝。
3. 請填寫使用者及組織名稱，請選擇【下一步】進行安裝。
4.選擇安裝路徑，通常不會改變，請選擇【下一步】進行安裝。
5. 請選擇要安裝的原件，通常會一起安裝Desinger跟Administrator，請選擇【下一步】進行安裝。
6. 請選擇【安裝】進行安裝。
7. 安裝中。
8. 請選擇【完成】結束安裝。
9. Client 設定開始，請選擇【下一步】進行設定。
10. 輸入名稱及要連線的伺服器，請選擇【下一步】進行設定。
11. 輸入帳號密碼，請選擇【確定】進行設定。
12. 這邊不設定即時訊息，請將鉤鉤移除，請選擇【下一步】進行設定。
13. 不額外配置，以預設為主，請選擇【下一步】進行設定。
14. 完成設定。
15. Notes Client 歡迎畫面。
2012年10月31日 星期三
Domino Server 6.54 安裝及設定
1. 安裝的歡迎畫面，請選【Next】開始安裝。
2. 合約的瀏覽，請選【Yes】繼續安裝。
3. 輸入姓名及公司名稱，請選【Next】繼續安裝。
4. 選擇安裝目錄，請選【Next】繼續安裝。
5. 選擇安裝伺服器的類型，通常選擇企業伺服器，請選【Next】繼續安裝。
通用伺服器：只有應用程式服務，不提供郵件服務。
郵件伺服器：只有郵件服務，不提供應用程式服務。
企業伺服器：包含應用程式服務及郵件服務。
6. 設定在開始功能選項上建立的資料夾，通常不去改變，請選【Next】繼續安裝。
7. 伺服器安裝中，請等待。
8. 安裝完畢
9. 設定Domino Server，開啟Lotus Domino Server。
10. 開啟方式，選擇以一般應用程式開啟(可依個人喜好設定)。
Windows service：Windows一開機便執行。
Reqular application：由User自行開啟。
11. 設定字型大小，請選【Next】繼續設定。
12. 選擇設定為第一台伺服器，請選【Next】繼續設定。
14. 輸入伺服器名稱，請選【Next】繼續設定。
15. 輸入組織名稱及密碼，請選【Next】繼續設定。
16. 輸入伺服器的Domino Name，請選【Next】繼續設定。
17. 設定管理者ID，輸入名稱及密碼，請選【Next】繼續設定。
18. 選擇其他的服務協定，請選【Next】繼續設定。
19. 使用預設選項，請選【Next】繼續設定。
20. 使用預設選項，請選【Next】繼續設定。
21.檢查所有的設定是否正確，請選【Setup】開始設定。
22.設定完成。
2. 合約的瀏覽，請選【Yes】繼續安裝。
3. 輸入姓名及公司名稱，請選【Next】繼續安裝。
4. 選擇安裝目錄，請選【Next】繼續安裝。
5. 選擇安裝伺服器的類型，通常選擇企業伺服器，請選【Next】繼續安裝。
通用伺服器：只有應用程式服務，不提供郵件服務。
郵件伺服器：只有郵件服務，不提供應用程式服務。
企業伺服器：包含應用程式服務及郵件服務。
6. 設定在開始功能選項上建立的資料夾，通常不去改變，請選【Next】繼續安裝。
7. 伺服器安裝中，請等待。
8. 安裝完畢
9. 設定Domino Server，開啟Lotus Domino Server。
10. 開啟方式，選擇以一般應用程式開啟(可依個人喜好設定)。
Windows service：Windows一開機便執行。
Reqular application：由User自行開啟。
11. 設定字型大小，請選【Next】繼續設定。
12. 選擇設定為第一台伺服器，請選【Next】繼續設定。
14. 輸入伺服器名稱，請選【Next】繼續設定。
15. 輸入組織名稱及密碼，請選【Next】繼續設定。
16. 輸入伺服器的Domino Name，請選【Next】繼續設定。
17. 設定管理者ID，輸入名稱及密碼，請選【Next】繼續設定。
18. 選擇其他的服務協定，請選【Next】繼續設定。
19. 使用預設選項，請選【Next】繼續設定。
20. 使用預設選項，請選【Next】繼續設定。
21.檢查所有的設定是否正確，請選【Setup】開始設定。
22.設定完成。
2011年8月4日 星期四
在Lotus Notes 的web 中，取得資料庫路徑的方法有兩種【較常用的方法】，複雜的就不說了。
1.url：
var pathname = (window.location.pathname);
var pathname = (window.location.pathname);
var dbpath=pathname.substring(0,(pathname.toLowerCase().lastIndexOf('.nsf')+5));
如果網址為→http://Test.com.tw/test01/test.nsf/testForm?OpenForm
那印出的值為→【/test01/test.nsf/】
2.用javascript設定常數：
<已計算完值>裡面的公式為→@WebDbName
這樣在javascript 裡直接取_CurrentDBName值就可以了
訂閱：
文章 (Atom)