小编Bil*_*ski的帖子

无法连接到G1上的摄像头服务

我为这篇长篇文章提前道歉,但有必要说明发生了什么.

我一直在研究一款适用于1.6模拟器的应用程序,但我的G1上却有炸弹.

这是摄影师的活动:

public class Photographer extends Activity {

 private SurfaceView preview = null;
 private SurfaceHolder previewHolder = null;
 private Camera camera = null;
 public static final int IMAGE_HEIGHT = 320;
 public static final int IMAGE_WIDTH = 480;

 @Override
 public void onCreate(Bundle savedInstanceState) {
  super.onCreate(savedInstanceState);
  setContentView(R.layout.photographer);

  preview = (SurfaceView)findViewById(R.id.preview);
  previewHolder = preview.getHolder();
  previewHolder.addCallback(surfaceCallback);
  previewHolder.setType(SurfaceHolder.SURFACE_TYPE_PUSH_BUFFERS);
 }

 private void takePicture() {
  camera.stopPreview();
  camera.takePicture(null, null, photoCallback);
 }

 SurfaceHolder.Callback surfaceCallback = new SurfaceHolder.Callback() {
  public void surfaceCreated(SurfaceHolder holder) {
   camera = Camera.open();

   try { …
Run Code Online (Sandbox Code Playgroud)

android

5
推荐指数
2
解决办法
2万
查看次数

Perl-SQLite3:基本问题

我承认自从我使用Perl已经有一段时间了,但这让我很难过.

这是问题所在:

#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use DBI;

print "Content-type: text/html\n\n";
print "<html><head><title></title></head></body>";

my $login = "admin@xxxxx.com";
my $dbfile = "/var/www/shopsite-data/shopsite_db";
my $sql = qq`SELECT ss_OrderID FROM ss_ORDER WHERE ss_Email=?`;

my $dbh = DBI->connect("dbi:SQLite:dbname=$dbfile", "", "") || die "Cannot connect: $DBI::errstr";

my $sth = $dbh->prepare($sql);
$sth->execute($login) or die $sth->errstr();
while (my @result = $sth->fetchrow_array()) {
  print "OrderID: $result[0]<br />";
}
$sth->finish;

print "</body>";
print "</html>";
$dbh->disconnect;
Run Code Online (Sandbox Code Playgroud)

什么都不返回,但是当使用相同的查询使用sqlite3登录时,我得到了一个结果集.当我更改查询时,我也得到一个结果集

my $sql = qq`SELECT ss_OrderID FROM ss_ORDER WHERE ss_Email=?`;
Run Code Online (Sandbox Code Playgroud)

my $sql = …
Run Code Online (Sandbox Code Playgroud)

sqlite perl

3
推荐指数
1
解决办法
1099
查看次数

标签 统计

android ×1

perl ×1

sqlite ×1