Запуск WebService (на моем хосте) с помощью PostString в B4A
Мне задавали этот вопрос несколько раз. но никто не отвечает мне. я пишу веб-сервис и загружаю его на мой хост, asp.net. это работает отлично. Теперь я хочу использовать его на B4A. я пишу ниже строки. но job1.Success является ложным. Зачем?
Код B4A:
Dim job1 As HttpJob
job1.Initialize("", Me)
Dim ConString As String = "Data Source= ASPNETDB3.mssql.somee.com;Initial Catalog=ASPNETDB3;User ID=a;Password=***;"
job1.PostString("http://mywebsite.com/MYServices2.asmx?op=insert_into_test_tbl2","conString =" & ConString & "&name=" & "a" & "&grade=" & 3)
Wait For (job1) JobDone(job1 As HttpJob)
If job1.Success Then
a=job1.GetString
End If
job1.Release
Код веб-сервиса:
[WebMethod]
public void insert_into_test_tbl2(string conString, string name, int grade)
{
con = new SqlConnection(conString);
SqlCommand cmd = con.CreateCommand();
SqlTransaction tr;
string comm = "insert into test_tbl (name, grade) VALUES(N'" +
name + "', " +
grade + ") ";
cmd.CommandText = comm;
if (con.State == ConnectionState.Closed)
con.Open();
tr = con.BeginTransaction();
cmd.Transaction = tr;
cmd.ExecuteNonQuery();
tr.Commit();
}
Спасибо