- Jun 6, 2020
- 11,559
- 4,422
I have an old app (sdk version 28) had been running well as below for more than a year.
1. app sends parameters to backend server using codes below
...
Private wv_scanlocation As WebView
...
Dim lHttpJob As HttpJob ' use local resource to avoid crash
lHttpJob.Initialize(strjob, Me)
lHttpJob.PostString(gUrl, strparam)
...
Sub JobDone (Job As HttpJob)
If Job.Success = True Then
Select Job.JobName
...
Case "scanlocation"
wv_scanlocation.LoadHtml(Job.GetString)
...
2. backend server response with a data entry form with a submit button to the app screen
...
<form id=scanpickuppcs method=post action="
<table>
<tr><td>Seal <%=req("fld6")%> saved </td></tr>
<tr><td>No.of items pickuped: <input type=text name=fld7> </td></tr>
<tr><td><input class=btnSubmit type=submit name=submit value="Submit"></td></tr>
</table>...
1. app sends parameters to backend server using codes below
...
Private wv_scanlocation As WebView
...
Dim lHttpJob As HttpJob ' use local resource to avoid crash
lHttpJob.Initialize(strjob, Me)
lHttpJob.PostString(gUrl, strparam)
...
Sub JobDone (Job As HttpJob)
If Job.Success = True Then
Select Job.JobName
...
Case "scanlocation"
wv_scanlocation.LoadHtml(Job.GetString)
...
2. backend server response with a data entry form with a submit button to the app screen
...
<form id=scanpickuppcs method=post action="
برای دیدن لینک ها باید ثبت نام کنید
"><table>
<tr><td>Seal <%=req("fld6")%> saved </td></tr>
<tr><td>No.of items pickuped: <input type=text name=fld7> </td></tr>
<tr><td><input class=btnSubmit type=submit name=submit value="Submit"></td></tr>
</table>...
برای دیدن لینک ها باید ثبت نام کنید
برای دیدن لینک ها باید ثبت نام کنید