Skip to content

Instantly share code, notes, and snippets.

View akira345's full-sized avatar

akira345 akira345

28 followers · 22 following
View GitHub Profile
@akira345
akira345 / gist:5245011
Created March 26, 2013 12:29
PHPでのランダムパスワード生成プログラムを書いてみた。
<?php
class DefaultPassword {
public function generate(){
//乱数初期化
srand();
//12文字以上16文字未満
$in_length = rand(12,16);
//アルファベット
for($i=0;$i<25;++$i){
@akira345
akira345 / gist:5096951
Last active December 14, 2015 13:58
VB.Netでパネル上に配置されたテキストボックスのNullチェック
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Requisite() As String = {"Txt_name", "Txt_jyusyo", "Txt_tel"}
'
'カレントコントロールから
'OfTypeでまずはパネルコントロールをフィルタ
'これをfromとし、
'さらにテキストボックスをフィルタ Function(c)
'これに対し、Function(c1)で、配列Requisiteに入っている要素から、TextがNullのものを選択 Function(cc)
@akira345
akira345 / gist:5096451
Last active December 14, 2015 13:49
VB.Netで複数のテキストボックスに対し、Nullチェックを掛けるサンプルをサクッと書いてみた。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim count = Me.Controls.Cast(Of Control)().Count(Function(c) (TypeOf c Is TextBox) AndAlso DirectCast(c, TextBox).Text = "")
If (count > 0) Then
MessageBox.Show("エラー")
End If
End Sub
@akira345
akira345 / rack_test.rb
Created November 29, 2012 01:05 — forked from eiel/rack_test.rb
rack と erb の sample 初期状態
require 'rubygems'
require 'rack'
require 'erb'
class RackApp
def call(env)
[200, {'Content-Type' => 'text/html'}, [<<END_HTML]
<html>
<head><title>Rack test</title></head>