台灣最大程式設計社群網站
線上人數
1736
 
會員總數:243634
討論主題:188245
歡迎您免費加入會員
討論區列表 >> VB.NET >> 表單內容儲存成*.INI
[]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
表單內容儲存成*.INI
價值 : 50 QP  點閱數:3019 回應數:8

樓主

!~安伯~!
初學者
80 16
564 34
發送站內信

怎樣將表單內的資料儲存成*.ini

並下次啟動時載入。

搜尋相關Tags的文章: [ 儲存 ] ,
本篇文章發表於2006-10-27 20:09
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
1樓
不錯的參考

小琳
捐贈 VP 給 小琳 檢舉此回應
:::想要表單的哪些資訊做儲存???
本篇文章回覆於2006-10-27 21:55
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
2樓
作者回應

!~安伯~!
檢舉此回應
就像下次使否開機時載入的 CheckBox、TextBox裡面的資料目錄等等資訊。
本篇文章回覆於2006-10-29 13:25
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
3樓
最有價值解答

小琳
捐贈 VP 給 小琳 檢舉此回應
:::
http://www.developer.com/net/asp/article.php/3287991
本篇文章回覆於2006-10-29 22:09
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
4樓
不錯的參考

豬肉
捐贈 VP 給 豬肉 檢舉此回應
這是用 VB.NET


' 讀取一筆資料
Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByRef nSize As Integer, ByVal lpFileName As String) As Integer

' 寫入一筆資料
Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" _
(ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Integer


lpApplicationName 段落名稱
lpKeyName 讀取/寫入 項目名稱
lpDefault 讀取時沒有項目時作回傳資料
lpReturnedString 存放傳回資料
nSize lpReturnedString 字串長度
lpString 寫入資料內容
lpFileName 讀取/寫入 檔案名稱

lpApplicationName,lpKeyName,lpDefault,lpString,lpFileName
以上這些變數內容不要有中文,有中文時會被 API 破壞



[你的表單]

CheckBox=TRUE
TextBox=TextBox
本篇文章回覆於2006-10-31 01:31
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
5樓
作者回應

!~安伯~!
檢舉此回應
有辦法處理中文不被破壞的嗎!?

檔案路徑有中文的話要怎樣處理!!
本篇文章回覆於2006-10-31 21:50
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
6樓
作者回應

!~安伯~!
檢舉此回應
TO 小琳:

您提共的資料中 GetBoolean 好像沒辦法讀 WriteBoolean 寫的 布林值 所以不知道哪要改?
至於中文他好像可以讀的樣子!!
本篇文章回覆於2006-10-31 23:12
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
7樓
回應

小琳
捐贈 VP 給 小琳 檢舉此回應
:::試試看

本篇文章回覆於2006-11-01 09:26
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
8樓
回應

豬肉
捐贈 VP 給 豬肉 檢舉此回應
用比較笨的方法

讀取一筆資料


dim a1,a2,a3,a4 as string

dim nsize as integer

dim lpApplicationName,lpKeyName,lpDefault,lpReturnedString,lpFileName As String

a1="段落名稱"
a2="項目名稱
a3="c:\資料管理\會員資料檔.txt"

lpApplicationName=a1
lpKeyName=a2
lpDefault=""
nSize=1024
lpReturnedString=space(nSize)
lpFileName =a3

Integer1= GetPrivateProfileString(lpApplicationName,lpKeyName,lpDefault,lpReturnedString,nSize,lpFileName)
a4=strings.left(lpReturnedString,Integer1)

Integer1 為實際讀取長度
lpReturnedString 為傳回資料存放區

如果這些變數都破壞
lpApplicationName,lpKeyName,lpDefault,lpReturnedString,lpFileName
那 a1 , a2 , a3 都還是原來之值


寫入一筆資料 也相同
本篇文章回覆於2006-11-01 22:01
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
   
1

回覆
如要回應,請先登入.