小吳 VBQA 程式設計討論

請問大家...我新增的程式碼如下
rec.AddNew
rec.Fields("fano") = txtfano
　　　rec.Fields("faname") = txtfaname
　　　rec.Fields("tel") = txttel

To Define arrays for storing lists of data (up to 10 sets)…
Option Explicit
Private Const MAX = 10
Private Names(1 To MAX) As String
The code shown above should be added to the DataManagement module. Note that the keywords Option Explicit may already be there, depending on how Visual Basic is set up. Add them if not. Note that, in addition to the actual array declaration for the Names array, a Constant has been　declared (a fixed value that we give a name to). The constant is used wherever we wish to refer to the size of the array or the position of the last element, the advantage of this being that if we wanted to change to an array of 100 entries, we could simply change the value of the constant.

請問如何連結Lotus Notes 的資料
*.nsf
且讀取到Lotus notes 的資料
如何將Lotus notes 轉到 Access 2000 ??
thanks

INSERT INTO NRel (BNO,NNO,name,Note) values ('206','3','04-7611545','戶籍電話')
為什麼會Error 拿掉 note　'戶籍電話' 就可以
請指教 thank

各位..
目前小弟正試著寫一個將midi file 轉為音譜的程式,但在看midi的資料時,一直沒辦法知道在midi檔中如何決定一個音符的長度(是1/4音符還是其他),遍尋資料也看不到有關的規格目前已知應該是與Header Chunk中的 delta-time ticks per quarter note 與 90 之後的第3,4個byte有關,但其規則為何,有誰能告知如何處理,謝謝...

"SELECT PART_NO, QTY_CASE, UNIT_PRICE, NET_AMOUNT, NOTE ,SUM(NET_AMOUNT) AS TOTAL FROM Estib3 WHERE ESTI_NO LIKE " & Chr(39) & rsMaster!ESTI_NO & Chr(39)
不過這樣的語法是錯誤的,因為其他選取的欄位都必須列在Group By 中,但是我的須求又不能這樣做
我的需求是這樣的,我的TABLE中有個欄位是價格(NET_AMOUNT)現在我要取得總價SUM(NET_AMOUNT)和一些其他的欄位,我現在是想在同一個步驟內完成(意即每個欄位與SUM欄位皆包含在同一個Recordset中),
但是如果要這樣又須要使用GROUP BY 但是我GROUP BY 出來的話資料必定不符合我的須求,想請教各位有什麼方法可以解決嗎?謝謝

請問各位:我用 MAPI autoemail 附加一個Excell檔,如果接收端是
Exchange Server 檔案沒問題,但如果是接收端是Lotus Notes Server ,附加檔會變成 att1.unk 似乎沒傳成功,可是如果是用手動去傳這個Excell檔,又很正常,不知道各位知道是什麼原因??

如何Dim 一個rs 後利用Filter將其同id 的名稱寫入NOTES裡
如果用FILTER這個指令在Recodeset

SPENCER YANG您好，先前承蒙您指教關於txt檔轉入Access問題已大致了解，
但是我的txt檔為什麼都找不到換行字元呢？
我的intPosition 都會是0，所以都只可轉入第一筆資料,
這是我改過的部份程式：
Private Sub PutToData1(ByVal strFileName As String, rs As ADODB.Recordset)

Here is my question as follow and I'll be much appricated if anyone could help me solve the problem.
我試著將 0 ~255 數字(integer) 存入一 string, 每個數字佔一個 byte 的長度; 程式片段如下:
For i = 0 To (compLen -1) ' 迴圈執行 次。
　　　　　CompStr = CompStr & Chr$(bytearray(i))
　　　　 Next i