抓OpenData 的Json問題

-
本來是去抓OpenData的資料定期更新
結果最近突然GG

查了半天找不到方法
最後主管告知通過添加UserAgent可以解決
666

紀錄一下程式碼
 webRequest.UserAgent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/74.0.3729.169 Safari/537.36";

留言

張貼留言

這個網誌中的熱門文章

VB 檢查數字

-
今天Sorcer要在一個字串裡面檢查數字 查到一個簡單好用的函數，做個紀錄 If IsNumeric(CoValue) = "True" Then CoValue = Double.Parse(CoValue) End If 這樣是不是很簡單呢
閱讀完整內容

CheckBox GridView 動態產生

-
Protected Sub gv_account_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles gv_account.RowDataBound If e.Row.RowType = DataControlRowType.DataRow Then Dim ck = New CheckBox ck.ID = "Scheck" e.Row.Cells(1).Controls.Add(ck) End If End Sub 抓值方式 Sub PermissionCheck() Dim gvr As GridViewRow Dim KeyName As String For Each gvr In gv_account.Rows Dim cb As CheckBox = CType(gvr.FindControl("Scheck"), CheckBox) If cb.Checked = True Then KeyName = gv_account.DataKeys(gvr.RowIndex).Values(0) End If Next End Sub
閱讀完整內容