| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [讨论]对时间进行改写 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123819) |
| -- 作者：haipo -- 发布时间：2018/8/23 18:27:00 -- [讨论]对时间进行改写 Dim hc As New HttpClient("URL") Dim xml As String = hc.GetData() Dim doc As New Xml.XmlDocoment doc.LoadXml(xml) Dim ts As String = doc.DocomentEliment.FirstChild.Attributes.GetNamedItem("timestamp") MessageBox.Show(ts) [此贴子已经被作者于2018/8/29 23:01:39编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2018/8/23 20:22:00 -- http://www.foxtable.com/mobilehelp/scr/0241.htm |
| -- 作者：haipo -- 发布时间：2018/8/23 21:50:00 -- [此贴子已经被作者于2018/8/29 23:01:53编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2018/8/23 21:58:00 -- msgbox("2018-08-23T13%3a48%3a32.577Z ".split(".")(0)) |
| -- 作者：haipo -- 发布时间：2018/8/24 0:44:00 -- 转换编码的函数 [此贴子已经被作者于2018/8/24 15:37:54编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2018/8/24 8:49:00 -- URL编码不需要区分大小写的 |
| -- 作者：haipo -- 发布时间：2018/8/24 10:23:00 -- 那有没有办法将大小写区分开？ |
| -- 作者：有点蓝 -- 发布时间：2018/8/24 10:44:00 -- 区分什么地方的大小写？ |
| -- 作者：haipo -- 发布时间：2018/8/24 10:52:00 -- [此贴子已经被作者于2018/8/29 23:02:16编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2018/8/24 11:02:00 -- Dim s As String = "9i6Zzc1v++Q5cscyu5XXO1eVgCUr2VRDKoNx1ysoGQM=" Dim b As new StringBuilder For Each c As Char In s Dim v As String = UrlEncode(c) If v.Length > 1 Then b.Append(UrlEncode(c).ToUpper()) Else b.Append(c) End If Next msgbox(b.ToString) [此贴子已经被作者于2018/8/24 11:02:26编辑过]
|