http://msdn.microsoft.com/vbasic/downloads/tools/refactor/
在VS2005模擬PDA
1.啟動模擬器
2.工具–>裝置模擬器管理員–>連線
3.本機電腦,ActiveSync連線設定允許連線到DMA
4.在我的電腦/行動裝置下可看到模擬的PDA
5.測試在PDA上讀檔及上下傳的功能
String & StringBuilder
字串是指用來表示文字的 Unicode 字元之循序集合。
String 物件是指表示字串的 System.Char 物件之循序集合。
String 物件的值是循序集合的內容,而該值是不變的。
String 物件稱為不變的 (唯讀),因為建立它之後便無法修改它的值。
看起來好像會修改 String 物件的方法實際上是傳回含有修改的新 String 物件。
如果有必要修改字串式物件的實際內容,請使用 System.Text.StringBuilder 類別。
WIN CE上的.NET支援度不足
OOXX,原本很簡單的程式:以xml當做資料檔來新、修、查、刪,
卻因為.NET Compact Framework不支援XPathNavigator,
促使我必需用很麻煩的方式去處理,
FILEOPEN不能用已經搞到很火大了說,現在還來這招,
寫到真想罵人呀!!
使用 XPath 資料模型處理 XML 資料
http://msdn2.microsoft.com/zh-tw/library/87274khy(VS.80).aspx
http://cht.gotdotnet.com/quickstart/howto/doc/Xml/OverviewofXML.aspx
使用 XPathDocument 類別(唯讀)讀取 XML 文件 —–> 決定 XML 文件的編碼方式 –> 建立 XPathNavigator 物件
使用 XmlDocument 類別(可編輯)讀取 XML 文件 ─┘
NULL的處理
- DBNull.Value
- DbDataReader的IsDbNull
開發win CE
Windows Mobile 5.0 Developer Resource Kit (8xxMB)
包含:
- Mobile 5.0 SDK for PPC
- Mobile 5.0 SDK for Smart Phone
- VS 2005 Express
- Sample Code
- 還有一些 Tools
HASH
方法一:使用fileOpen、fileGet、filePut、fileClose
‘先定義資料結構
Structure RowOBS04
Dim TDATE As String ‘交易日期
Dim ITEM_ID As String ‘貨品代碼
Dim KIND_ID As String ‘品種代碼
Dim ITEM_NAME As String ‘貨品名稱
Dim KIND_NAME As String ‘品種名稱
Dim ITEM_CAT As String ‘產品分類
Dim KIND_CAT As String ‘品種分類
End Structuresub GETDATA()
Dim Cusdat As RowOBS04
Dim fileNumber As Integer = FreeFile()FileOpen(fileNumber, fileName, OpenMode.Random)
FileGet(fileNumber, Cusdat, CInt(TextBox1.Text))
FileClose(fileNumber)
TextBox2.Text = Cusdat.TDATE
TextBox3.Text = Cusdat.ITEM_ID
TextBox4.Text = Cusdat.KIND_ID
TextBox5.Text = Cusdat.ITEM_NAME
TextBox6.Text = Cusdat.KIND_NAME
TextBox7.Text = Cusdat.ITEM_CAT
TextBox8.Text = Cusdat.KIND_CAT
end sub
sub SETDATA()
Dim Cusdat As RowOBS04
Dim fileNumber As Integer = FreeFile()FileOpen(fileNumber, fileName, OpenMode.Random)
‘UPDATE資料
Cusdat.TDATE = TextBox2.Text
Cusdat.ITEM_ID = TextBox3.Text
Cusdat.KIND_ID = TextBox4.Text
Cusdat.ITEM_NAME = TextBox5.Text
Cusdat.KIND_NAME = TextBox6.Text
Cusdat.ITEM_CAT = TextBox7.Text
Cusdat.KIND_CAT = TextBox8.Text
FilePut(fileNumber, Cusdat, CInt(TextBox1.Text))
FileClose(fileNumber)
end sub
方法二:system.io.file
1.定義一筆RecordLen
2.計算位置=(筆數-1)*RecordLen3.三種方式[適情況而定]
(1)索引條件為數字,且知道數字不大
==================
item_id | item_Name | kind
0070
0071
.
.
.
9999
====================
以上這種情況,可以用數字直接作索引條件,71塞到71的位置,73塞到73的位置,如72沒資料就留一筆RecordLen空白(2)索引條件為數字,但數字大
建索引(也是一個文字檔)
no為item_id除某一質數的餘數
record_no為實際位置
==========================
[餘數出現重覆情況則放後面,如超過預計放置筆數,則用FLAG記錄之後從哪個NO開始]
no | item_id | record_no | item_id | record_no | item_id | record_no | flag
1 0000070 1
2 0000071 2
.
.
.
100 0071000 20000
.
.
.
==========================(3)索引條件不一定為數字
如出現字母,則可把字母排除,或把字母轉為數字來進行INDEX