Bwired Googlemaps upload data webservice
Bwired Googlemaps upload data webservice
@Wifi: You need to use the vb extension for the script name
Rene.
Rene.
Bwired Googlemaps upload data webservice
LOL.. I've got BV
--
--
Bwired Googlemaps upload data webservice
<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"><i>Originally posted by Bwired</i>
I'm thinking about selling this data to the highest bidder
<hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">
As long as Nieuwegein is plotted where it is right now, you won't get 1 cent [:D][:D]
I'm thinking about selling this data to the highest bidder
<hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">
As long as Nieuwegein is plotted where it is right now, you won't get 1 cent [:D][:D]
Bwired Googlemaps upload data webservice
Hmmm<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"> Error 1 Running script xml2bwired.vb :method not found <hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">
It's not my day..
--
It's not my day..
--
Bwired Googlemaps upload data webservice
Chak is covering up his real location;-)
Rene.
Rene.
Bwired Googlemaps upload data webservice
this is what I have.
<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote">Imports System.IO
Imports System.Net
Imports System.Text
sub main(parms As Object)
const url = "http://www.bwired.nl/Bwiredservice/receive.asp"
const screenname="wifi"
const name="wifi"
const passwd="xxxxxxx"
const city="Almere"
const gpslat="52.364463"
const gpslong="5.068431"
const title="Home"
const temp ="[5"
dim myXML
dim xmlhttp
myXML = hs.CreateStringClass
myXML.Add("<?xml version=""1.0"" encoding=""UTF-8"" ?>")
myXML.Add("<BWired>")
myXML.Add("<Init>")
myXML.Add("<DateTime>" & Now() & "</DateTime>")
myXML.Add("<UserName>" & name & "</UserName>")
myXML.Add("<Password>" & passwd & "</Password>")
myXML.Add("<ScreenName>" & screenname & "</ScreenName>")
myXML.Add("<Gpslat>" & gpslat & "</Gpslat>")
myXML.Add("<Gpslong>" & gpslong & "</Gpslong>")
myXML.Add("<City>" & city & "</City>")
myXML.Add("<Website />")
myXML.Add("<WebCamPicUrl />")
myXML.Add("<Title>" & title & "</Title>")
myXML.Add("</Init>")
myXML.Add("<Entry>")
myXML.Add("<Name>Outside Temperature</Name>")
myXML.Add("<ID>1</ID>")
myXML.Add("<Units>C</Units>")
myXML.Add("<Value>" & CStr(hs.DeviceValue(temp) / 10).Replace(",", ".") & "</Value>")
myXML.Add("</Entry>")
myXML.Add("</BWired>")
xmlhttp = WebRequest.Create(url)
xmlhttp.Method = "POST"
Dim byteArray As Byte() = Encoding.UTF8.GetBytes(myXML.Value)
xmlhttp.ContentType = "text/xml"
xmlhttp.ContentLength = byteArray.Length
Dim dataStream As Stream = xmlhttp.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
dataStream.Close()
Dim response As WebResponse = xmlhttp.GetResponse()
response.Close()
myXML.Reset
End Sub<hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">
--
<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote">Imports System.IO
Imports System.Net
Imports System.Text
sub main(parms As Object)
const url = "http://www.bwired.nl/Bwiredservice/receive.asp"
const screenname="wifi"
const name="wifi"
const passwd="xxxxxxx"
const city="Almere"
const gpslat="52.364463"
const gpslong="5.068431"
const title="Home"
const temp ="[5"
dim myXML
dim xmlhttp
myXML = hs.CreateStringClass
myXML.Add("<?xml version=""1.0"" encoding=""UTF-8"" ?>")
myXML.Add("<BWired>")
myXML.Add("<Init>")
myXML.Add("<DateTime>" & Now() & "</DateTime>")
myXML.Add("<UserName>" & name & "</UserName>")
myXML.Add("<Password>" & passwd & "</Password>")
myXML.Add("<ScreenName>" & screenname & "</ScreenName>")
myXML.Add("<Gpslat>" & gpslat & "</Gpslat>")
myXML.Add("<Gpslong>" & gpslong & "</Gpslong>")
myXML.Add("<City>" & city & "</City>")
myXML.Add("<Website />")
myXML.Add("<WebCamPicUrl />")
myXML.Add("<Title>" & title & "</Title>")
myXML.Add("</Init>")
myXML.Add("<Entry>")
myXML.Add("<Name>Outside Temperature</Name>")
myXML.Add("<ID>1</ID>")
myXML.Add("<Units>C</Units>")
myXML.Add("<Value>" & CStr(hs.DeviceValue(temp) / 10).Replace(",", ".") & "</Value>")
myXML.Add("</Entry>")
myXML.Add("</BWired>")
xmlhttp = WebRequest.Create(url)
xmlhttp.Method = "POST"
Dim byteArray As Byte() = Encoding.UTF8.GetBytes(myXML.Value)
xmlhttp.ContentType = "text/xml"
xmlhttp.ContentLength = byteArray.Length
Dim dataStream As Stream = xmlhttp.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
dataStream.Close()
Dim response As WebResponse = xmlhttp.GetResponse()
response.Close()
myXML.Reset
End Sub<hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">
--
Bwired Googlemaps upload data webservice
@Wifi: I don't know what is causing this error, seems something to do with .Net
@Chak: You are probably using the coordinates you configured in Homeseer by choosing the Amsterdam presets.
Rene.
@Chak: You are probably using the coordinates you configured in Homeseer by choosing the Amsterdam presets.
Rene.
Bwired Googlemaps upload data webservice
Ok, I'm in. Sent a sample for authorisation.
Bwired Googlemaps upload data webservice
<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"><i>Originally posted by wifi</i>
<br />Hmmm[quote] Error 1 Running script xml2bwired.vb :method not found <hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">Chak Or Rene can you mail wifi the script, perhaps that helps, could be something in the format etc, then we can rule those things out!
<br />Hmmm[quote] Error 1 Running script xml2bwired.vb :method not found <hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">Chak Or Rene can you mail wifi the script, perhaps that helps, could be something in the format etc, then we can rule those things out!
Bwired Googlemaps upload data webservice
52.052846;5.093622
This what I'm using.
did change it few times to see why it was not working
This what I'm using.
did change it few times to see why it was not working
Bwired Googlemaps upload data webservice
We got out first foreigner (Belgium) on the data service! [:)]
Welcome Droezel!
@chak: you are all set now, Coordinates changed.
Welcome Droezel!
@chak: you are all set now, Coordinates changed.
Bwired Googlemaps upload data webservice
Okay.
I redid the script, and it looks like I've got it working (no clue why it did not work 1st)
So.. You should see some stuff comig in from me'. At the moment only one device, but I will be adding more later.
--
I redid the script, and it looks like I've got it working (no clue why it did not work 1st)
So.. You should see some stuff comig in from me'. At the moment only one device, but I will be adding more later.
--
Bwired Googlemaps upload data webservice
Works, saw you coming in!
I authorized you, so if you send again you are on the map (close to Rene )
I authorized you, so if you send again you are on the map (close to Rene )
Bwired Googlemaps upload data webservice
Data is on it's way.
Re: close to Rene.
Yes I (we) know. Just as well that I have a netfilter
--
Re: close to Rene.
Yes I (we) know. Just as well that I have a netfilter
--
Bwired Googlemaps upload data webservice
Welcome Wifi, you're there