首页 | 新闻中心| 公司介绍| 产品走廊| 渠道与销售| 技术支持| 下载中心| 用户认证
蓝色快车PB俱乐部论坛--PowerBuilder MIS编程浏览:各位老大帮看看吧
>>欢迎您,请先登陆 | 注册 | 发贴排行 | 搜索 | 帮助 | 退出
    蓝色快车PB俱乐部论坛
    PowerBuilder MIS编程
       浏览:各位老大帮看看吧

  发表一个新主题  发表一个新投票 回复主题  您是本帖的第 956 个阅读者
 * 贴子主题: 各位老大帮看看吧 保存该页为文件 报告本帖给版主 显示可打印的版本  把本贴加入论坛收藏夹  把本贴加入IE收藏夹 

 掉线,给我留言吧!  chnama
  
  
  等级:新手上路
 财产:310
 经验:170
 魅力:200
  注册:2003-7-28
  文章:13
  鉴定:保密

  给chnama发送一个短消息 查看chnama的个人资料 搜索chnama在PowerBuilder  点击这里发送电邮给chnama 访问chnama的主页  引用回复这个贴子 

发贴心情 各位老大帮看看吧
integer li_FileNum, loops, i
long ll_len

long flen, bytes_read, new_pos

blob b, tot_b

string ls_pic

ls_pic = "e:\1.bmp"

// Set a wait cursor

SetPointer(HourGlass!)

// Get the file length, and open the file

flen = FileLength(ls_pic)

li_FileNum = FileOpen(ls_pic, &
 StreamMode!, Read!, LockRead!)

// Determine how many times to call FileRead

IF flen > 32765 THEN
 IF Mod(flen, 32765) = 0 THEN
  loops = flen/32765
 ELSE
  loops = (flen/32765) + 1
 END IF

ELSE
 loops = 1

END IF

// Read the file

new_pos = 1

FOR i = 1 to loops
 bytes_read = FileRead(li_FileNum, b)
 tot_b = tot_b + b
 
 ll_len = len(tot_b)

NEXT

FileClose(li_FileNum)

p_1.setpicture(tot_b)

int li_id
select isnull(max(id),0)
into :li_id
from img_base;

li_id = li_id + 1

insert into img_base values(:li_id,null);
if sqlca.sqlcode <> 0 then
 messagebox("insert",sqlca.sqlerrtext)
 rollback;
 return
end if

sqlca.autocommit = true
updateblob img_base
set img = :tot_b
where id = :li_id;
sqlca.autocommit = false

if sqlca.sqlnrows = 0 then
 messagebox("update",sqlca.sqlerrtext)
 rollback;
 return
else
 commit;
end if

为什么总说“在关键字‘NULL’附近有语法错误”啊?


发贴时间: 2003/8/5 13:17:11 保密


 掉线,给我留言吧!  shjychina
  
  
  等级:版主
 财产:460
 经验:270
 魅力:300
  注册:2003-7-25
  文章:18
  鉴定:保密

  给shjychina发送一个短消息 查看shjychina的个人资料 搜索shjychina在PowerBuilder  点击这里发送电邮给shjychina 访问shjychina的主页  引用回复这个贴子 

发贴心情 
应该这么写
select max(id) into :li_id from img_base;

if isnull(li_id ) then li_id = 0

因为isnull()是pb的函数,数据库不认识,在这里应该写数据库函数


发贴时间: 2003/8/5 14:05:05 保密


 掉线,给我留言吧!  chnama
  
  
  等级:新手上路
 财产:310
 经验:170
 魅力:200
  注册:2003-7-28
  文章:13
  鉴定:保密

  给chnama发送一个短消息 查看chnama的个人资料 搜索chnama在PowerBuilder  点击这里发送电邮给chnama 访问chnama的主页  引用回复这个贴子 

发贴心情 
ISNULL
使用指定的替换值替换 NULL。

语法
ISNULL ( check_expression , replacement_value )


发贴时间: 2003/8/5 14:52:39 保密


 掉线,给我留言吧!  shjychina
  
  
  等级:版主
 财产:460
 经验:270
 魅力:300
  注册:2003-7-25
  文章:18
  鉴定:保密

  给shjychina发送一个短消息 查看shjychina的个人资料 搜索shjychina在PowerBuilder  点击这里发送电邮给shjychina 访问shjychina的主页  引用回复这个贴子 

发贴心情 
你用的数据库支持就可以,那就需要参考数据库手册了

发贴时间: 2003/8/6 9:15:19 保密


 掉线,给我留言吧!  chnama
  
  
  等级:新手上路
 财产:310
 经验:170
 魅力:200
  注册:2003-7-28
  文章:13
  鉴定:保密

  给chnama发送一个短消息 查看chnama的个人资料 搜索chnama在PowerBuilder  点击这里发送电邮给chnama 访问chnama的主页  引用回复这个贴子 

发贴心情 
忘了说啦,数据库是SQL Server 2000

发贴时间: 2003/8/6 9:32:02 保密


 掉线,给我留言吧!  shjychina
  
  
  等级:版主
 财产:460
 经验:270
 魅力:300
  注册:2003-7-25
  文章:18
  鉴定:保密

  给shjychina发送一个短消息 查看shjychina的个人资料 搜索shjychina在PowerBuilder  点击这里发送电邮给shjychina 访问shjychina的主页  引用回复这个贴子 

发贴心情 
可能是pb的问题吧,SQL Server 2000 里面可以使

你在pb的isql里面试验一下


发贴时间: 2003/8/8 10:32:44 保密


 掉线,给我留言吧!  chnama
  
  
  等级:新手上路
 财产:310
 经验:170
 魅力:200
  注册:2003-7-28
  文章:13
  鉴定:保密

  给chnama发送一个短消息 查看chnama的个人资料 搜索chnama在PowerBuilder  点击这里发送电邮给chnama 访问chnama的主页  引用回复这个贴子 

发贴心情 
在那里怎么把图片读进来啊

发贴时间: 2003/8/13 16:36:30 保密


 掉线,给我留言吧!  cmaboy
  
  
  等级:职业侠客
 财产:
 经验:
 魅力:
  注册:--
  文章:53
  鉴定:保密

  给cmaboy发送一个短消息 查看cmaboy的个人资料 搜索cmaboy在PowerBuilder  点击这里发送电邮给cmaboy 引用回复这个贴子 

发贴心情 
updateblob

发贴时间: 2003/8/16 19:06:43 保密

页次:1/1页每页10 本主题贴数8

分页: [1]

 *快速回复:各位老大帮看看吧 顶端 
你的用户名:   还没注册? 密码:   忘记密码?请与管理员联系
内容
  • HTML标签: 不可用
  • UBB标签: 允许
  • 贴图标签: 允许
  • Flash标签:允许
  • 表情字符转换:允许
  • 上传图片:允许
  • 最多16KB
  • 邮件回复 显示签名  [Ctrl+Enter直接提交贴子]

    ">