Skip to content

Instantly share code, notes, and snippets.

@takabow

takabow/store_sample.bas

Created March 31, 2014 20:41
Show Gist options
  • Save takabow/9901749 to your computer and use it in GitHub Desktop.
Save takabow/9901749 to your computer and use it in GitHub Desktop.
Download ZIP
riak-vba-client sample
Raw
store_sample.bas
Dim node As RiakNode
Set node = New RiakNode
node.RemoteAddress = "127.0.0.1"
node.Port = 10018
Dim response As RiakResponse
Set response = node.Store("bucket1", "key1", "hello,riak,vba,client", "text/csv")
If response.isSuccess Then
MsgBox "Object stored!"
Else
MsgBox "Store operation failed - " & response.Reason
End If
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment