EC2:サーバを起動する

1,IAM

---------------------------------------
AWSサービス:Amazon EC2
アクション     :StartInstances
Amazonリソースネーム(ARN):*
---------------------------------------

2,プログラム仕様

●入力パラメータ
・IAMユーザの”アクセスキーID”と”・シークレットアクセスキー”
・インスタンスID
●処理内容
指定したインスタンスIDのサーバを起動する
●エラー処理
停止中以外のステータスの場合メッセージ表示

3,画面構成

4,プログラム

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim _AWSID As String = TextBox1.Text
        Dim _AWSPass As String = TextBox2.Text
        Dim _InstanceID As String = TextBox3.Text

        Dim cred As Amazon.Runtime.BasicAWSCredentials
        cred = New Amazon.Runtime.BasicAWSCredentials(_AWSID, _AWSPass)
        Dim ec2client As Amazon.EC2.AmazonEC2Client
        ec2client = New Amazon.EC2.AmazonEC2Client(cred, Amazon.RegionEndpoint.APNortheast1)

        Dim reQ = New Amazon.EC2.Model.StartInstancesRequest
        reQ.InstanceIds.Add(_InstanceID)

        Dim Res As Amazon.EC2.Model.StartInstancesResponse
        Res = ec2client.StartInstances(reQ)

        If Res.StartingInstances(0).CurrentState.Code <> 0 Then
            MsgBox("サーバは停止中ではありません。")
        End If
End Sub

5,解説

Comments