k4m4r82

Option Explicit
 
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hwnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
 
Private Declare Function GetMenu Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetSubMenu Lib "user32" (ByVal hMenu As Long, ByVal nPos As Long) As Long
Private Declare Function GetMenuItemID Lib "user32" (ByVal hMenu As Long, ByVal nPos As Long) As Long
 
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

k4m4r82

Option Explicit
'********************************************
'*    (c) 1999-2000 Sergey Merzlikin        *
'********************************************

Private Const STATUS_TIMEOUT = &H102&
Private Const INFINITE = -1& ' Infinite interval
Private Const QS_KEY = &H1&
Private Const QS_MOUSEMOVE = &H2&
Private Const QS_MOUSEBUTTON = &H4&

k4m4r82

<?xml version="1.0"?>

<configuration>
    
    <system.web>
        <compilation debug="false" targetFramework="4.0" />
    </system.web>    
    
  <system.serviceModel>
    

k4m4r82

<services>      
  <service name="CalculatorServer.Calculator" behaviorConfiguration="DefaultBehavior">                        
	<endpoint binding="basicHttpBinding" bindingConfiguration="BasicHttpBindingConfig" contract="CalculatorLib.ICalculator" />
  </service>                        	  
</services>

k4m4r82

Title

<Additional information about your API call. Try to use verbs that match both request type (fetching vs modifying) and plurality (one vs multiple).>

• URL

  <The URL Structure (path only, no root url)>

• Method:

k4m4r82

using Microsoft.Owin.Hosting;

namespace DemoSignalR.WinFormServer
{
    public partial class FrmServer : Form
    {
        private IDisposable signalR { get; set; }
        private const string SERVER_URL = "http://192.168.56.1:8282";

        public FrmServer()

k4m4r82

using Microsoft.AspNet.SignalR.Client;
using DemoSignalR.Model;

namespace DemoSignalR.WinFormClient
{
    public partial class FrmClient : Form
    {
        private const string SERVER_URL = "http://192.168.56.1:8282";

        private HubConnection hubConnection;

k4m4r82

' tambahkan referensi Microsoft Scripting Runtime
Option Explicit

Private mOrderID            As Long
Private mCustomerID         As String
Private mOrderDate          As String
Private mShipName           As String
Private mShipAddress        As String
Private mListOfOrderDetail  As Scripting.Dictionary

k4m4r82

Option Explicit

Private mOrderID        As Long
Private mProductID      As Long
Private mUnitPrice      As Double
Private mQuantity       As Integer
Private mDiscount       As Single

Public Property Let orderID(ByVal vData As Long)
    mOrderID = vData

k4m4r82

Option Explicit

Private dbConn  As DbConnection
Private conn    As ADODB.Connection
Private strSql  As String

Private Sub Class_Initialize()
    Set dbConn = New DbConnection
    Set conn = dbConn.GetOpenConnection
End Sub