Skip to content

Instantly share code, notes, and snippets.

@takabow

takabow/cluster_sample.bas

Last active August 29, 2015 13:57
Show Gist options
  • Save takabow/9901866 to your computer and use it in GitHub Desktop.
Save takabow/9901866 to your computer and use it in GitHub Desktop.
Download ZIP
riak-vba-client sample
Raw
cluster_sample.bas
Dim cluster As RiakCluster
Set cluster = New RiakCluster
Dim node1 As RiakNode
Set node1 = New RiakNode
node1.RemoteAddress = "192.168.0.1"
node1.Port = 10018
Dim node2 As RiakNode
Set node2 = New RiakNode
node2.RemoteAddress = "192.168.0.2"
node2.Port = 10018
cluster.AddRiakNode node1
cluster.AddRiakNode node2
Dim response As RiakResponse
Set response = cluster.Fetch("bucket1", "key1")
...
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment