Skip to content

Instantly share code, notes, and snippets.

View jz5's full-sized avatar

jz5 jz5

54 followers · 25 following
View GitHub Profile
@jz5
jz5 / Main.vb
Created August 31, 2015 02:13
Module Module1
Sub Main()
#Region "keys"
Dim consumerKey = "***"
Dim consumerSecret = "***"
Dim accessToken = "***"
Dim accessSecret = "***"
#End Region
Dim tokens = CoreTweet.Tokens.Create(consumerKey, consumerSecret, accessToken, accessSecret)
@jz5
jz5 / response.json
Created August 2, 2015 13:28
{
"ContentId": "TestId",
"IsMatch": true,
"MatchDetails": {
"AdvancedInfo": [],
"MatchFlags": [
{
"AdvancedInfo": [
{
"Key": "MatchId",
@jz5
jz5 / request.json
Created August 2, 2015 13:27
{
"DataRepresentation": "URL",
"Value": "https://wbintcvsstorage.blob.core.windows.net/matchedimages/img_130.jpg"
}
@jz5
jz5 / Modeul.vb
Created July 20, 2015 05:56
Dim arduinos = From a In {"", "ー"}
From d In {"デ", "ド"}
From u In {"ィ", "ゥ", "ュ"}
From i In {"", "イ", "ィ"}
Select "ア" & a & "ル" & d & u & i & "ーノ"
@jz5
jz5 / web.config
Created July 5, 2015 14:49
<httpRuntime maxQueryStringLength="10000" />
@jz5
jz5 / web.config
Created July 5, 2015 14:44
<system.webServer>
<security>
<requestFiltering>
<requestLimits maxQueryString="10000" />
</requestFiltering>
</security>
</system.webServer>
@jz5
jz5 / MainModule.vb
Last active August 29, 2015 14:24
Module MainModule
Sub Main()
Dim path = IO.Path.Combine(Environment.ExpandEnvironmentVariables("%WEBROOT_PATH%"), "Default.html")
IO.File.WriteAllText(path, "<body>" & Now.ToString & "</body>", Text.Encoding.UTF8)
End Sub
End Module
@jz5
jz5 / native.main.css
Last active August 29, 2015 14:24
.comment {
display:inline-block;
white-space:nowrap;
-webkit-animation-name:marquee;
-webkit-animation-timing-function:linear;
-webkit-animation-duration:10s;
-webkit-animation-iteration-count:infinite;
-moz-animation-name:marquee;
-moz-animation-timing-function:linear;
-moz-animation-duration:10s;
@jz5
jz5 / Program.cs
Last active August 29, 2015 14:23
static void Main(string[] args)
{
var url = "http://example.jp/xml";
var client = new WebClient() { Encoding = Encoding.UTF8 };
var xml = client.DownloadString(url);
var d = XDocument.Parse(Sanitize(xml));
}
private static string Sanitize(string xml)
{
@jz5
jz5 / Module.vb
Created June 28, 2015 13:55
Sub Main()
Dim url = "http://example.jp/xml"
Dim client = New WebClient With {.Encoding = Text.Encoding.UTF8}
Dim xml = client.DownloadString(url)
Dim d = XDocument.Parse(Sanitize(xml))
End Sub
Private Function Sanitize(xml As String) As String
Dim sb = New Text.StringBuilder