2017年11月23日 星期四

水耕 - 魚菜共生(1)

水耕-初體驗
這是:水映菜苗 , 由種子到發牙約 1 週時間 !
圖1:
有發現,完全覆蓋在培養土內的話,發牙時間1週 ; 未完全覆蓋則須較久,目前有的還未發牙!
圖2:
移植水映菜苗至魚缸邊並掛著! 採用白鐵壓製掛勾!
剩下就慢慢記錄了! 須時間....
--


2017年11月18日 星期六

服裝租借 - 送洗作業

應客戶需求 , 服裝租借系統 , 加入新功能 : 送洗作業  , 並採用收據方式列印 (出單機方式出單 )
---


2017年11月1日 星期三

vbnet XML 檢查節點

參考來源:Check if a node/element exists in an XML file
---
Dim vDoc As XmlDocument = New XmlDocument
vDoc.Load(pathToXml)
        Dim objTest As XmlElement
        objTest = vDoc.SelectSingleNode("//profileData/friends")
        If Not (objTest Is Nothing) Then
            'The node is present, do nothing
            Dim blank = ""
        Else
            'The node is absent, process code to create it.
            Dim xml = XDocument.Load(pathToXml)
            Dim vbfriends = From friends In xxml.
            vvbfriends(0).Add()
            xml.Save(pathToXml, SaveOptions.None)
        End If