Spanish Funciona en modo debug, no en modo Release. Coneccion SQL SERVER

[Erlan Rospigliosi]

Saludos

Utilizo la librería MSSQL, y en mi proyecto hago selección, inserción y actualización y funciona todo OK, pero solo cuando lo ejecuto en modo Debug.
Pero falla cuando lo compilo en modo Release

Dim db As MSSQL
dim L as List
Dim str As String

db.setDatabase("x.x.x.x","MyDatabase","MyUsr","Mypwd")

L.Initialize
L = db.Query("Select * from myTable")

If Lx.IsInitialized= True Then
For i= 0 To Lx.Size-1
str = Lx.Get(i)
Msgbox (str ,"")
Next
Else
Return
End If

Ahora el MSSQL.xml veo que utiliza el jtds-1.2.5 para concetarse a SQL SERVER, ahora no será que ese archivo jar no se copia al compilar en modo release.

Ahora otra cosa que detecto que cuando db.Query("Select * from myTable") lo ejecuto en modo debug entrega datos, pero en modo release entrega null.

 

[Ferbis]

Erlan,

You should put this thread in the Spanish Forum. The general forum is in english.

Deberias poner este hilo en el Forum Español, el General es en inglés

Lo siento pero no tengo la respuesta.

Mira Android Tutorial Connect Android to MS SQL Server Tutorial.

 

[SamuelSlf]

Hola,

https://www.b4x.com/android/forum/threads/connect-android-to-ms-sql-server-tutorial.13166/

Yo probé esto código y consegui ejecutar en mi telefono.
Yo creé un pequeño WebService qué responde en JSON, no és como lo ejemplo pero yo customizei.
Así yo puedo usar en qualquer aplicacion(Asp.net, PHP, Xamarin, B4a, B4i y etc...), como és en JSON, la respuesta és màs rapida, (con las nuevas tecnologias és possible comprimir aun mas lo JSON).
Yo recomendo usar aplicaciones WebApi o WebService.
Perdon por mi pésimo español

 

[Erlan Rospigliosi]

Bueno pudo correr cuando modifique el manifest editor

El Manifest debe ser así

Usar Library MSSQL

Dim db As MSSQL
Dim i As Int
Dim L As List
Dim Camp() As String
Dim str As String

db.setDatabase("192.X.X.X","Database","User","Pass")

L.Initialize
L = db.Query("Exec myStored_Listar Null, 1 ") //Llamo a mi stored procedure con 2 parametros

For i= 1 To L.Size-1
str = L.Get(i)
str = str.Replace("[","").Replace ("]","")
Camp = Regex.Split(",", str)
msgbox(camp(0) ,"Camp")
Next


Los archivos los saque de aqui here:
https://www.b4x.com/android/forum/threads/mssql-with-jdbc-library-v1-00.22244/