ASP.NET เรียก PHP กับฐานข้อมูล MySQL ผ่าน Web Service และการรับส่งค่าผ่านเว็บเซอร์วิส

<?php
		require_once("lib/nusoap.php");
		 
		//Create a new soap server
		$server = new soap_server();
		 
		//Define our namespace
		$namespace = "http://localhost/nusoap/WebServiceServer_Login.php";
		$server->wsdl->schemaTargetNamespace = $namespace;
		 
		//Configure our WSDL
		$server->configureWSDL("CustomerLogin");
		 
		//Register our method and argument parameters
        $varname = array(
                   'strUsername' => "xsd:string",
				   'strPassword' => "xsd:string"
        );
		
		// Register service and method
		$server->register('chkCustomerLogin',$varname, array('return' => 'tns:ArrayOfString'));
		
		//Add ComplexType with Array
		$server->wsdl->addComplexType("ArrayOfString", 
						 "complexType", 
						 "array", 
						 "", 
						 "SOAP-ENC:Array", 
						 array(), 
						 array(array("ref"=>"SOAP-ENC:arrayType","wsdl:arrayType"=>"xsd:string[]")), 
						 "xsd:string");  
		 
		function chkCustomerLogin($strUsername,$strPassword)
		{

				$objConnect = mysql_connect("localhost","root","") or die(mysql_error());
				$objDB = mysql_select_db("mydatabase");
				$strSQL = "
					SELECT * FROM customer WHERE 1  
					AND Username = '".$strUsername."'
					AND Password = '".$strPassword."'
				";
				$objQuery = mysql_query($strSQL) or die (mysql_error());
				$objResult = mysql_fetch_array($objQuery);
				if($objResult)
				{
					$arr[0] = true;
					$arr[1] = $objResult["CustomerID"];
					$arr[2] = null;
				}
				else
				{
					$arr[0] = false;
					$arr[1] = null;
					$arr[2] = "Invalid username or password";
				}
				
				/***
					$arr[0] // Return Status Login false or true
					$arr[1] // Return CustomerID
					$arr[2] // Return Error Message
				*/
				mysql_close();

				return $arr;
		}
		 
		// Get our posted data if the service is being consumed
		// otherwise leave this data blank.
		$POST_DATA = isset($GLOBALS['HTTP_RAW_POST_DATA']) ? $GLOBALS['HTTP_RAW_POST_DATA'] : '';
		 
		// pass our posted data (or nothing) to the soap service
		$server->service($POST_DATA);
		exit(); 
?>

<?php
		require_once("lib/nusoap.php");
		 
		//Create a new soap server
		$server = new soap_server();
		 
		//Define our namespace
		$namespace = "http://localhost/nusoap/WebServiceServer_Show.php";
		$server->wsdl->schemaTargetNamespace = $namespace;
		
		//Configure our WSDL
		$server->configureWSDL("getCustomer");
		
		//Add ComplexType
		$server->wsdl->addComplexType( 
			'DataList', 
			'complexType', 
			'struct', 
			'all', 
			'', 
			   array( 
					'CustomerID' => array('name' => 'CustomerID', 'type' => 'xsd:string'), 
					'Username'  => array('name' => 'Username', 'type'  => 'xsd:string'),
					'Password'  => array('name' => 'Password', 'type'  => 'xsd:string'),
					'Name'  => array('name' => 'Name', 'type'  => 'xsd:string'),
					'Email'  => array('name' => 'Email', 'type'  => 'xsd:string'),
					'CountryCode'  => array('name' => 'CountryCode', 'type'  => 'xsd:string'),
					'Budget'  => array('name' => 'Budget', 'type'  => 'xsd:float'),
					'Used'  => array('name' => 'Used', 'type'  => 'xsd:float')
		   ) 
		); 
		
		//Add ComplexType
		$server->wsdl->addComplexType( 
			'DataListResult', 
			'complexType', 
			'array', 
			'', 
			'SOAP-ENC:Array', 
			array(), 
			array( 
				array('ref'=>'SOAP-ENC:arrayType','wsdl:arrayType'=>'tns:DataList[]') 
			), 
			'tns:DataList' 
		); 

		//Register our method and argument parameters
        $varname = array(
                   'strCustomerID' => "xsd:string"
        );
		
		// Register service and method
		$server->register('resultCustomer',    // method name 
			$varname, // input parameters 
			array('return' => 'tns:DataListResult')); 

		 
		function resultCustomer($strCustomerID)
		{
				$objConnect = mysql_connect("localhost","root","") or die(mysql_error());
				$objDB = mysql_select_db("mydatabase");
				$strSQL = "SELECT * FROM customer WHERE 1 AND CustomerID = '".$strCustomerID."' ";
				$objQuery = mysql_query($strSQL) or die (mysql_error());
				$intNumField = mysql_num_fields($objQuery);
				$resultArray = array();
				while($obResult = mysql_fetch_array($objQuery))
				{
					$arrCol = array();
					for($i=0;$i<$intNumField;$i++)
					{
						$arrCol[mysql_field_name($objQuery,$i)] = $obResult[$i];
					}
					array_push($resultArray,$arrCol);
				}

				mysql_close($objConnect);
				
				return $resultArray;
		}
		 
		// Get our posted data if the service is being consumed
		// otherwise leave this data blank.
		$POST_DATA = isset($GLOBALS['HTTP_RAW_POST_DATA']) ? $GLOBALS['HTTP_RAW_POST_DATA'] : '';
		 
		// pass our posted data (or nothing) to the soap service
		$server->service($POST_DATA);
		exit(); 
?>

<?php
		require_once("lib/nusoap.php");
		 
		//Create a new soap server
		$server = new soap_server();
		 
		//Define our namespace
		$namespace = "http://localhost/nusoap/WebServiceServer_Save.php";
		$server->wsdl->schemaTargetNamespace = $namespace;
		 
		//Configure our WSDL
		$server->configureWSDL("UpdateCustomer");
		 
		//Register our method and argument parameters
        $varname = array(
                   'strCustomerID' => "xsd:string",
				   'strPassword' => "xsd:string",
				   'strName' => "xsd:string",
				   'strEmail' => "xsd:string",
				   'strCountryCode' => "xsd:string",
				   'strBudget' => "xsd:float",
				   'strUsed' => "xsd:float"
        );
		
		// Register service and method
		$server->register('saveUpdateCustomer',$varname, array('return' => 'tns:ArrayOfString'));
		
		//Add ComplexType with Array
		$server->wsdl->addComplexType("ArrayOfString", 
						 "complexType", 
						 "array", 
						 "", 
						 "SOAP-ENC:Array", 
						 array(), 
						 array(array("ref"=>"SOAP-ENC:arrayType","wsdl:arrayType"=>"xsd:string[]")), 
						 "xsd:string");  
		
		 //Method update
		function saveUpdateCustomer($strCustomerID,
			$strPassword,
			$strName,
			$strEmail,
			$strCountryCode,
			$strBudget,
			$strUsed)
		{

				$objConnect = mysql_connect("localhost","root","") or die(mysql_error());
				$objDB = mysql_select_db("mydatabase");
				$strSQL = "
					UPDATE customer SET
						Password = '".$strPassword."',
						Name = '".$strName."',
						Email = '".$strEmail."',
						CountryCode = '".$strCountryCode."',
						Budget = '".$strBudget."',
						Used = '".$strUsed."'
					WHERE CustomerID = '".$strCustomerID."'
				";
				$objQuery = mysql_query($strSQL);
				if($objQuery)
				{
					$arr[0] = true;
					$arr[1] = null;
				}
				else
				{
					$arr[0] = false;
					$arr[1] = mysql_error();
				}
				/***			
					$arr[0] // Return Status Update
					$arr[1] // Return Error Message
				*/
				mysql_close();

				return $arr;
		}
		 
		// Get our posted data if the service is being consumed
		// otherwise leave this data blank.
		$POST_DATA = isset($GLOBALS['HTTP_RAW_POST_DATA']) ? $GLOBALS['HTTP_RAW_POST_DATA'] : '';
		 
		// pass our posted data (or nothing) to the soap service
		$server->service($POST_DATA);
		exit(); 
?>

    Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnLogin.Click
        Dim clsLogin As New clsCustomerLogin.CustomerLogin
        Dim myArr As Array = clsLogin.chkCustomerLogin(Me.txtUsername.Text, Me.txtPassword.Text)
        If CStr(myArr(0)) = "1" Then
            Session("strCustomerID") = myArr(1).ToString()
            Response.Redirect("frmShow.aspx")
        Else
            Me.ClientScript.RegisterStartupScript(Me.GetType(), "myalert", "alert('" & myArr(2) & "');", True)
        End If
    End Sub

        protected void btnLogin_Click(object sender, EventArgs e)
        {
            clsCustomerLogin.CustomerLogin clsLogin = new clsCustomerLogin.CustomerLogin();
            Array myArr = (Array)clsLogin.chkCustomerLogin(this.txtUsername.Text, this.txtPassword.Text);
            if (Convert.ToString(myArr.GetValue(0)) == "1")
            {
                Session["strCustomerID"] = myArr.GetValue(1).ToString();
                Response.Redirect("frmShow.aspx");
            }
            else
            {
                this.ClientScript.RegisterStartupScript(this.GetType(), "myalert", "alert('" + myArr.GetValue(2).ToString() + "');", true);
            }
        }

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        If IsNothing(Session("strCustomerID")) Then
            Response.Redirect("frmLogin.aspx")
            Response.End()
        End If

        Dim cls As New clsGetCustomer.getCustomer
        Dim myArr As Array = cls.resultCustomer(Session("strCustomerID"))
        If myArr.Length > 0 Then
            Me.lblCustomerID.Text = DataBinder.Eval(myArr(0), "CustomerID").ToString()
            Me.lblUsername.Text = DataBinder.Eval(myArr(0), "Username").ToString()
            Me.lblPassword.Text = DataBinder.Eval(myArr(0), "Password").ToString()
            Me.lblName.Text = DataBinder.Eval(myArr(0), "Name").ToString()
            Me.lblEmail.Text = DataBinder.Eval(myArr(0), "Email").ToString()
            Me.lblCountryCode.Text = DataBinder.Eval(myArr(0), "CountryCode").ToString()
            Me.lblBudget.Text = DataBinder.Eval(myArr(0), "Budget").ToString()
            Me.lblUsed.Text = DataBinder.Eval(myArr(0), "Used").ToString()
        End If

    End Sub

        protected void Page_Load(object sender, EventArgs e)
        {
            if ((Session["strCustomerID"] == null))
            {
                Response.Redirect("frmLogin.aspx");
                Response.End();
            }

            clsGetCustomer.getCustomer cls = new clsGetCustomer.getCustomer();
            Array myArr = cls.resultCustomer(Session["strCustomerID"].ToString());
            if (myArr.Length > 0)
            {
                this.lblCustomerID.Text = DataBinder.Eval(myArr.GetValue(0), "CustomerID").ToString();
                this.lblUsername.Text = DataBinder.Eval(myArr.GetValue(0), "Username").ToString();
                this.lblPassword.Text = DataBinder.Eval(myArr.GetValue(0), "Password").ToString();
                this.lblName.Text = DataBinder.Eval(myArr.GetValue(0), "Name").ToString();
                this.lblEmail.Text = DataBinder.Eval(myArr.GetValue(0), "Email").ToString();
                this.lblCountryCode.Text = DataBinder.Eval(myArr.GetValue(0), "CountryCode").ToString();
                this.lblBudget.Text = DataBinder.Eval(myArr.GetValue(0), "Budget").ToString();
                this.lblUsed.Text = DataBinder.Eval(myArr.GetValue(0), "Used").ToString();
            }
        }

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        If IsNothing(Session("strCustomerID")) Then
            Response.Redirect("frmLogin.aspx")
            Response.End()
        End If

        If Not Page.IsPostBack Then
            BindData()
        End If

    End Sub

    Protected Sub BindData()
        Dim cls As New clsGetCustomer.getCustomer
        Dim myArr As Array = cls.resultCustomer(Session("strCustomerID"))
        If myArr.Length > 0 Then
            Me.lblCustomerID.Text = DataBinder.Eval(myArr(0), "CustomerID").ToString()
            Me.lblUsername.Text = DataBinder.Eval(myArr(0), "Username").ToString()
            Me.txtPassword.Text = DataBinder.Eval(myArr(0), "Password").ToString()
            Me.txtName.Text = DataBinder.Eval(myArr(0), "Name").ToString()
            Me.txtEmail.Text = DataBinder.Eval(myArr(0), "Email").ToString()
            Me.txtCountryCode.Text = DataBinder.Eval(myArr(0), "CountryCode").ToString()
            Me.txtBudget.Text = DataBinder.Eval(myArr(0), "Budget").ToString()
            Me.txtUsed.Text = DataBinder.Eval(myArr(0), "Used").ToString()
        End If
    End Sub

    Protected Sub btnSave_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnSave.Click
        Dim cls As New clsUpdateCustomer.UpdateCustomer
        Dim myArr As Array = cls.saveUpdateCustomer(Session("strCustomerID"), _
                                                    Me.txtPassword.Text, _
                                                    Me.txtName.Text, _
                                                    Me.txtEmail.Text, _
                                                    Me.txtCountryCode.Text, _
                                                    Me.txtBudget.Text, _
                                                    Me.txtUsed.Text)

        If CStr(myArr(0)) = "1" Then
            Me.ClientScript.RegisterStartupScript(Me.GetType(), "myalert", "alert('Update Successfully ');window.location='frmShow.aspx';", True)
        Else
            Me.ClientScript.RegisterStartupScript(Me.GetType(), "myalert", "alert('Update Failed error..." & Replace(myArr(1), "'", "\'") & "');", True)
        End If

    End Sub

        protected void Page_Load(object sender, EventArgs e)
        {
            if ((Session["strCustomerID"] == null))
            {
                Response.Redirect("frmLogin.aspx");
                Response.End();
            }

            if (!Page.IsPostBack)
            {
                BindData();
            }
        }

        protected void BindData()
        {
            clsGetCustomer.getCustomer cls = new clsGetCustomer.getCustomer();
            Array myArr = cls.resultCustomer(Session["strCustomerID"].ToString());
            if (myArr.Length > 0)
            {
                this.lblCustomerID.Text = DataBinder.Eval(myArr.GetValue(0), "CustomerID").ToString();
                this.lblUsername.Text = DataBinder.Eval(myArr.GetValue(0), "Username").ToString();
                this.txtPassword.Text = DataBinder.Eval(myArr.GetValue(0), "Password").ToString();
                this.txtName.Text = DataBinder.Eval(myArr.GetValue(0), "Name").ToString();
                this.txtEmail.Text = DataBinder.Eval(myArr.GetValue(0), "Email").ToString();
                this.txtCountryCode.Text = DataBinder.Eval(myArr.GetValue(0), "CountryCode").ToString();
                this.txtBudget.Text = DataBinder.Eval(myArr.GetValue(0), "Budget").ToString();
                this.txtUsed.Text = DataBinder.Eval(myArr.GetValue(0), "Used").ToString();
            }
        }

        protected void btnSave_Click(object sender, EventArgs e)
        {
            clsUpdateCustomer.UpdateCustomer cls = new clsUpdateCustomer.UpdateCustomer();
            Array myArr = cls.saveUpdateCustomer(Session["strCustomerID"].ToString(), this.txtPassword.Text, this.txtName.Text, this.txtEmail.Text, this.txtCountryCode.Text, Convert.ToInt32(this.txtBudget.Text), Convert.ToInt32(this.txtUsed.Text));

            if (Convert.ToString(myArr.GetValue(0)) == "1")
            {
                this.ClientScript.RegisterStartupScript(this.GetType(), "myalert", "alert('Update Successfully ');window.location='frmShow.aspx';", true);
            }
            else
            {
                this.ClientScript.RegisterStartupScript(this.GetType(), "myalert", "alert('Update Failed error..." + myArr.GetValue(1).ToString().Replace("'","\\'") + "');", true);
            }
        }