[英]basic4android download file code
how can i add download db file code for this codes from URL ? 如何从URL添加此代码的下载db文件代码?
=================================================================== { *Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("lay1pezeshki") Dim jobname As String ======================================= = * =============== {*子Activity_Create(初次为布尔值)Activity.LoadLayout(“ lay1pezeshki”)昏暗的工作名称为字符串
job.Initialize("downloadfile",Me)
timer1.Initi
alize("t1",2000)
timer1.Enabled=True
Dim ruta As String
If File.ExternalWritable Then
ruta = File.DirDefaultExternal
Else
ruta = File.DirInternal
End If
If File.Exists(ruta,"uromkartbank.db")Then
File.copy(File.DirAssets,"uromkartbank.db",ruta,"uromkartbank.db")
End If
sql1.Initialize(ruta,"uromkartbank.db",True)
Dim cur1 As Cursor
cur1 =sql1.ExecQuery("select * from پزشکی")
Dim i As Int
For i=0 To 10
cur1.Position = i
b = ListView1.TwoLinesLayout.SecondLabel
b.TextSize = 10
b.TextColor= Colors.Red
c = ListView1.TwoLinesLayout.Label
c.TextSize = 18
c.TextColor= Colors.White
ListView1.AddTwoLines(cur1.GetString("name") &("--------------")& cur1.GetString("takhfif"),cur1.GetString("addres"))
Next
End Sub*
} }
fileURL = "http://dl.dropbox.com/u/25045/file.jpg" 'File To Download
HttpUtils.CallbackActivity = "myactivity" 'Current activity name.
HttpUtils.CallbackJobDoneSub = "DownloadFinished"
HttpUtils.Download("Job1", fileURL)
Dim out As OutputStream
out = File.OpenOutput(File.DirInternal, "file.jpg", True)
File.Copy2(HttpUtils.GetInputStream(imgurl), out)
out.Close
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.