French Demande d'aide sur une fonction Java à encoder

Similar threads

B4A Code Snippet [B4X] Convert bitmap to BMP format
B4A Question How create a binary string
B4A Question [WriteInt] Socket Usage ???
B4A Library SLStreams
B4A Question Running iptables script

Badesse

New Member
Licensed User
Bonjour,

Je me permets de venir vous demander un petit coup de main car je n'arrive pas à coder en b4a une fonction que j'ai trouvé sur le Net.

Cette fonction a pour but de retourner la Latitude et Longitude de la "CellTower" sur laquelle le GSM est connecté :
http://android-coding.blogspot.fr/2011/06/convert-celllocation-to-real-location.html

J'arrive sans problème à récupérer les lac et cid :
B4X:
Dim r As Reflector
Dim cid, lac As Int

r.Target = r.GetContext
r.Target = r.RunMethod2("getSystemService", "phone", "java.lang.String")
r.Target = r.RunMethod("getCellLocation")
cid = r.RunMethod("getCid")
lac = r.RunMethod("getLac")
Je transférerais ensuite ma demande grâce à httpUtils2 :
B4X:
Dim Http As HttpJob
Dim MyData as Byte

Http.PostBytes("http://www.google.com/glm/mmap",MyData)
Mon problème est que je n'arrive pas à construire ma chaîne binaire :/
J'ai regardé beaucoup de posts et tutos, et testé avec les librairies "ByteConverter" et "RandomAccessFile" mais sans succès.

Comment pourrais-je récupérer la chaîne suivante dans ma variable MyData :
B4X:
DataOutputStream dataOutputStream = new DataOutputStream(out);
dataOutputStream.writeShort(21);
dataOutputStream.writeLong(0);
dataOutputStream.writeUTF("en");
dataOutputStream.writeUTF("Android");
dataOutputStream.writeUTF("1.0");
dataOutputStream.writeUTF("Web");
dataOutputStream.writeByte(27);
dataOutputStream.writeInt(0);
dataOutputStream.writeInt(0);
dataOutputStream.writeInt(3);
dataOutputStream.writeUTF("");

dataOutputStream.writeInt(cid);
dataOutputStream.writeInt(lac); 

dataOutputStream.writeInt(0);
dataOutputStream.writeInt(0);
dataOutputStream.writeInt(0);
dataOutputStream.writeInt(0);
dataOutputStream.flush();
Vous remerciant par avance pour votre aide.

A+
 
Top