PHPとVS2015をJSONで連携する。
Imports System.Net
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim sTargetUrl As String = "http://zip358.com/tool/2015-12-01-smp/index.php"
Dim objWeb As WebClient = New WebClient()
Dim bResult As Byte() = objWeb.DownloadData(sTargetUrl)
Dim sJson As String = System.Text.Encoding.UTF8.GetString(bResult)
RichTextBox1.Text = sJson
End Sub
End Class
<?php
$hoge = array();
$a = 'jsonｷﾀ━(ﾟ∀ﾟ)━!name';
for ($i = 1; $i < 100; $i++)$hoge[$i] = array("id"=>$i,"name"=>$a);
//echo $hoge[$i]["name"];}
header('Content-type: application/json;charset=UTF-8');
echo json_encode($hoge, JSON_UNESCAPED_UNICODE);
これで事足りる。ちなみにVB2015からMYSQLに接続する方法とかも有ります。
この頃、VS2015無料版で何かできないかと模索中です。
前回作ったメモった何やら結構ダウンロードしてくれてる
みたいで結構嬉しかったりするのですが・・・
開発に時間もかかってないあんな短いしょぼいアプリでも
使ってもらえるって事は自分が作ったものって
案外需要がないわけではないことが
分かったので、アンドロイドアプリも作るつもりです。
ちなみに折り返しまで作っているのですが
あとAndroidStudio2.0がそろそろリリースされそうなので
リリースされてから、バージョンアップ後、
開発とかしようかなとか考えています。
ちなみに、上記のコードは少しパックってます(´Д｀)が！！
何か！？
ちなみにアセンブリをひとつ参照しないといけないので
ご注意をコレ＞＞system.web.Extensions を参照してくださいな！！
第二弾へ続く｛配列化して取得する。｝
タグ
１, AM, AndroidStudio2.0, Content-type, Dim bResult As Byte, Dim objSrializer As JavaScriptSerializer, Dim objWeb As WebClient, Dim sJson As String, Dim sTargetUrl As String, e As EventArgs, Handles Button1.Click, Imports System.Net, Imports System.Text, Imports System.Web.Script.Serialization, New JavaScriptSerializer, New WebClient, objWeb.DownloadData, Private Sub Button1_Click, Public Class Form1, RichTextBox1.Text, sender As Object, System.Text.Encoding.UTF8.GetString, system.web.Extensions, Visual Studio 2015 Windows, VS2015,
11月度のアクセス数公表。次回から6ヶ月に一回にします。
11月度のアクセス数公表。次回から6ヶ月に一回にします。
あまり前月とあまり変わらない数字が並んでいます。
どうすればアクセス数が伸びるかは何となく理解していますが
それだけで攻めていくのは、諸刃の剣とも言えますので
これがコケてもアレがあるようにしたくて模索中です。
なので・・・来年の6月に公表します。
｛2015年12月?2016年5月のアクセス数は2016年の6月に公表予定｝
タグ
11月度, Googleアドワーズ, SEM, Web担当者, Yahoo!リスティング広告対応, アクセス数公表, アレ, それだけ, 公表予定, 前月, 剣, 数字, 新版, 模索中, 次回, 法則, 諸刃,