老爸某次喝醉所記,依照內容,我將其命名為”回想有感”.
老實說,蠻難解的.
=====
紙識她得道的醉,欲仁知愛心所知.
三國搬弄是在朝,如無莊者為先覺.
全是沒非正知如,有眠不盡他鄉夢.
真有是一片風雲,只認前面真得道.
無言就為全是真,人生海海面貌不可料想.
base64 encode/decode
忘記從哪兒節錄下來的了,在這裡向作者說聲抱歉,因為那時沒有記下出處.
如果有侵犯版權的話,請來信告訴我,我會拿掉.
兩個 function 是作 base64 encode/decode 的.
不過, VFP7 以後,微軟已經擴充了 STRCONV() 的功能,讓他也能作 base64 encode/decode.
用法如下:
? STRCONV(“Hallo”,13) encodes to Base64
? STRCONV(“SGFsbG8=”,14) decodes from Base64
=====
FUNCTION Base64Encode(lcInput,loXML)
LOCAL loNode
IF VARTYPE(loXML) # “O”
loXML = CREATEOBJECT(“MSXML2.DOMDocument”)
loXML.Async = .F.
ENDIF
loXML.loadXML(“<node></node>”)
loNode = loXML.DocumentElement
loNode.dataType = “bin.base64”
loNode.nodeTypedValue = CREATEBINARY(lcInput)
RETURN loNode.Text
FUNCTION Base64Decode(lcInput,loXML)
LOCAL lcDocument
IF VARTYPE(loXML) # “O”
loXML = CREATEOBJECT(“MSXML2.DomDocument”)
loXML.Async = .F.
ENDIF
lcDocument = [<node xmlns:dt=”urn:schemas-microsoft-com:datatypes”
dt:dt=”bin.base64″>] + lcInput + [</node>]
loXML.loadXML(lcDocument)
RETURN loXML.DocumentElement.nodeTypedValue
[老爸語錄]看透
看透人心比酒濃,以是吾生所知,真是不虛.
人生之路,是金字塔所嚮往之頂,真能是為量的廣解,一語知天下.
=====
老爸某次喝醉後寫的,有點難解~
豐胸秘方
某次看于美人節目,順手記下來的
不知道有沒有用~~
=====
蒲公英 3 錢
當歸 2 錢
山藥 2 錢
三碗煮成一碗
以小火煎煮
可以喝也可以泡澡
並配合
以下動作
-> <-
注意,須脫下內衣~