microsoft visual foxpro sql中如何写case when?

sweetBug 2009-08-24 02:35:20
如上,我想在microsoft visual foxpro的命令窗口中执行以下SQL


select a.aac002,a.aac003,case when a.yeclfs = '1' then a.yelqje else null end as aac063 from yzd11 a

报错:
命令中含有不能识别的短语或关键字.
这个含有case的sql应该怎么写?
...全文
661 28 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
28 条回复
切换为时间正序
请发表友善的回复…
发表回复
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
谢谢各位!
gw6328 2009-08-24
  • 打赏
  • 举报
 回复
VF全忘了
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 23 楼 sql77 的回复:]
iif(a.yeclfs = '1',LTRIM(a.yelqje) , null)这样试试
[/Quote]

还是报这个错: 无法确定SQL列的数据类型
华夏小卒 2009-08-24
  • 打赏
  • 举报
 回复
这样，你加我QQ，：157410367
我试一下，呵呵，这个我来搞定，77，你去抢别的分吧
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
并且,即使我把SQL写成这样:


select a.aac002, a.aac003, a.yeclfs, a.yelqje, IIf(a.yeclfs = '1', 33, 0) as aac063 from Yzd11abcdefghijklmn a

满足条件的查出来还是 aac063 为 *号, 这是为什么啊?
SQL77 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 20 楼 sweetbug 的回复:]
谢谢:
引用 15 楼 sql77 的回复:
iif(a.yeclfs = '1',a.yelqje ,null)应该是楼主NULL的错误,改成数值型试试?

如果 Measures.CurrentMember 是空单元，则下面的示例返回 0，否则返回 1：

IIf(IsEmpty(Measures.CurrentMember), 0, 1)

字符串
如果 Measures.CurrentMember 是空单元，则下面的字符串返回字符串 "Yes"，否则返回字符串 "No"：

IIf(IsEmpty(Measures.CurrentMember), "Yes", "No")



'iif(a.yeclfs = '1',a.yelqje ,null)应该是楼主NULL的错误,改成数值型试试?'我就是想在a.yeclfs <> '1'的时候,取一个空值,这个如何实现?

并且我想iif(a.yeclfs = '1',a.yelqje ,null)返回一个数值型,与a.yelqje的类型一致,这怎样实现呢?

[/Quote]

iif(a.yeclfs = '1',LTRIM(a.yelqje) , null)这样试试
华夏小卒 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 19 楼 sql77 的回复:]
引用 17 楼 sweetbug 的回复:
不好意思,刚才重要的部分没有显示完全

楼主看一下IIF的函数的用法,如果两个是数值的话就都得是数值,应该是
iif(a.yeclfs = '1',a.yelqje ,null)
这里错误,要不然
iif(a.yeclfs = '1',LTRIM(a.yelqje) , null)
不知道函数里面能不能嵌套函数呢
[/Quote]

我试了一下，其实5楼的应该是可以的，
嵌套没关系
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 18 楼 js_szy 的回复:]
select a.aac002,a.aac003,;
iif(a.yeclfs = '1',a.yelqje , 0) as aac063    ;
from yzd11 a


&& 把null换成0看看
[/Quote]
换成0后查出来不满足条件的变成0了,然而满足条件的成了*号了
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
谢谢:
[Quote=引用 15 楼 sql77 的回复:]
iif(a.yeclfs = '1',a.yelqje ,null)应该是楼主NULL的错误,改成数值型试试?

如果 Measures.CurrentMember 是空单元，则下面的示例返回 0，否则返回 1：

IIf(IsEmpty(Measures.CurrentMember), 0, 1)

字符串
如果 Measures.CurrentMember 是空单元，则下面的字符串返回字符串 "Yes"，否则返回字符串 "No"：

IIf(IsEmpty(Measures.CurrentMember), "Yes", "No")


[/Quote]
'iif(a.yeclfs = '1',a.yelqje ,null)应该是楼主NULL的错误,改成数值型试试?'我就是想在a.yeclfs <> '1'的时候,取一个空值,这个如何实现?

并且我想iif(a.yeclfs = '1',a.yelqje ,null)返回一个数值型,与a.yelqje的类型一致,这怎样实现呢?
SQL77 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 17 楼 sweetbug 的回复:]
不好意思,刚才重要的部分没有显示完全
[/Quote]
楼主看一下IIF的函数的用法,如果两个是数值的话就都得是数值,应该是
iif(a.yeclfs = '1',a.yelqje , null)
这里错误,要不然
iif(a.yeclfs = '1',LTRIM(a.yelqje) , null)
不知道函数里面能不能嵌套函数呢
华夏小卒 2009-08-24
  • 打赏
  • 举报
 回复
select a.aac002,a.aac003,;
iif(a.yeclfs = '1',a.yelqje , 0) as aac063 ;
from yzd11 a


&& 把null换成0看看
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复

不好意思,刚才重要的部分没有显示完全
SQL77 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 14 楼 sweetbug 的回复:]
引用 10 楼 js_szy 的回复:
引用 9 楼 sweetbug 的回复:
还请教一个问题:
iif(a.yeclfs = '1',a.yelqje , null), 当行满足a.yeclfs = '1', 本应该取a.yelqje, 查出来的值怎么成了'*'号,而a.yelqje不为'*'号?


就是因为这个值类型的问题，好有可能是INT型超界，会显示为 *


a.yeclfs这列有小数点的,VF自动转换成整型了吗?
[/Quote]
如果是整型的会将小数自动转换的
SQL77 2009-08-24
  • 打赏
  • 举报
 回复
iif(a.yeclfs = '1',a.yelqje , null)应该是楼主NULL的错误,改成数值型试试?

如果 Measures.CurrentMember 是空单元，则下面的示例返回 0，否则返回 1：

IIf(IsEmpty(Measures.CurrentMember), 0, 1)

字符串
如果 Measures.CurrentMember 是空单元，则下面的字符串返回字符串 "Yes"，否则返回字符串 "No"：

IIf(IsEmpty(Measures.CurrentMember), "Yes", "No")

sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 10 楼 js_szy 的回复:]
引用 9 楼 sweetbug 的回复:
还请教一个问题:
iif(a.yeclfs = '1',a.yelqje , null), 当行满足a.yeclfs = '1', 本应该取a.yelqje, 查出来的值怎么成了'*'号,而a.yelqje不为'*'号?


就是因为这个值类型的问题，好有可能是INT型超界，会显示为 *
[/Quote]

a.yeclfs这列有小数点的,VF自动转换成整型了吗?
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 12 楼 sql77 的回复:]
iif(a.yeclfs = '1',a.yelqje , null)这个是什么类型呀无法确定列类型?
[/Quote]

a.yelqje 的类型是数值型的, 为什么查到满足条件的记录变成*号了?
SQL77 2009-08-24
  • 打赏
  • 举报
 回复
iif(a.yeclfs = '1',a.yelqje , null)这个是什么类型呀无法确定列类型?
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复

这里有图片,大侠们帮我看看!
华夏小卒 2009-08-24
  • 打赏
  • 举报
 回复
[Quote=引用 9 楼 sweetbug 的回复:]
还请教一个问题:
iif(a.yeclfs = '1',a.yelqje , null), 当行满足a.yeclfs = '1', 本应该取a.yelqje, 查出来的值怎么成了'*'号,而a.yelqje不为'*'号?
[/Quote]

就是因为这个值类型的问题，好有可能是INT型超界，会显示为 *
sweetBug 2009-08-24
  • 打赏
  • 举报
 回复
还请教一个问题:
iif(a.yeclfs = '1',a.yelqje , null), 当行满足a.yeclfs = '1', 本应该取a.yelqje, 查出来的值怎么成了'*'号,而a.yelqje不为'*'号?
加载更多回复（8）
VFP语法Selet,delete,Update等语法，方便学习
ＶＦＰ语法。 ＶＦＰ语法。 ＶＦＰ语法。 ＶＦＰ语法。 ＶＦＰ语法。 ＶＦＰ语法。 ＶＦＰ语法。 ＶＦＰ语法。
xls转mdb代码以及.exe执行软件
******* 导出到excel EXEC master..xp_cmdshell 'bcp SettleDB.dbo.shanghu out c:\temp1.xls -c -q -S"GNETDATA/GNETDATA" -U"sa" -P""' /*********** 导入Excel SELECT * FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions /*动态文件名 declare @fn varchar(20),@s varchar(1000) set @fn = 'c:\test.xls' set @s ='''Microsoft.Jet.OLEDB.4.0'', ''Data Source="'+@fn+'";User ID=Admin;Password=;Extended properties=Excel 5.0''' set @s = 'SELECT * FROM OpenDataSource ('+@s+')...sheet1$' exec(@s) */ SELECT cast(cast(科目编号 as numeric(10,2)) as nvarchar(255))+'　' 转换后的别名 FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions /********************** EXCEL导到远程SQL insert OPENDATASOURCE( 'SQLOLEDB', 'Data Source=远程ip;User ID=sa;Password=密码' ).库名.dbo.表名 (列名1,列名2) SELECT 列名1,列名2 FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions /** 导入文本文件 EXEC master..xp_cmdshell 'bcp dbname..tablename in c:\DT.txt -c -Sservername -Usa -Ppassword' /** 导出文本文件 EXEC master..xp_cmdshell 'bcp dbname..tablename out c:\DT.txt -c -Sservername -Usa -Ppassword' 或 EXEC master..xp_cmdshell 'bcp "Select * from dbname..tablename" queryout c:\DT.txt -c -Sservername -Usa -Ppassword' 导出到TXT文本，用逗号分开 exec master..xp_cmdshell 'bcp "库名..表名" out "d:\tt.txt" -c -t ,-U sa -P password' BULK INSERT 库名..表名 FROM 'c:\test.txt' WITH ( FIELDTERMINATOR = ';', ROWTERMINATOR = '\n' ) --/* dBase IV文件 select * from OPENROWSET('MICROSOFT.JET.OLEDB.4.0' ,'dBase IV;HDR=NO;IMEX=2;DATABASE=C:\','select * from [客户资料4.dbf]') --*/ --/* dBase III文件 select * from OPENROWSET('MICROSOFT.JET.OLEDB.4.0' ,'dBase III;HDR=NO;IMEX=2;DATABASE=C:\','select * from [客户资料3.dbf]') --*/ --/* FoxPro 数据库 select * from openrowset('MSDASQL', 'Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:\', 'select * from [aa.DBF]') --*/ /**************导入DBF文件****************/ select * from openrowset('MSDASQL', 'Driver=Microsoft Visual FoxPro Driver; SourceDB=e:\VFP98\data; SourceType=DBF', 'select * from customer where country != "USA" order by country') go /***************** 导出到DBF ***************/ 如果要导出数据到已经生成结构(即现存的)FOXPRO表中,可以直接用下面的SQL语句 insert into openrowset('MSDASQL', 'Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:\', 'select * from [aa.DBF]') select * from 表 说明: SourceDB=c:\ 指定foxpro表所在的文件夹 aa.DBF 指定foxpro表的文件名. /*************导出到Access********************/ insert into openrowset('Microsoft.Jet.OLEDB.4.0', 'x:\A.mdb';'admin';'',A表) select * from 数据库名..B表 /*************导入Access********************/ insert into B表 selet * from openrowset('Microsoft.Jet.OLEDB.4.0', 'x:\A.mdb';'admin';'',A表) 文件名为参数 declare @fname varchar(20) set @fname = 'd:\test.mdb' exec('SELECT a.* FROM opendatasource(''Microsoft.Jet.OLEDB.4.0'', '''+@fname+''';''admin'';'''', topics) as a ') SELECT * FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source="f:\northwind.mdb";Jet OLEDB:Database Password=123;User ID=Admin;Password=;')...产品 ********************* 导入 xml　文件 DECLARE @idoc int DECLARE @doc varchar(1000) --sample XML document SET @doc =' Customer was very satisfied Important Happy Customer. ' -- Create an internal representation of the XML document. EXEC sp_xml_preparedocument @idoc OUTPUT, @doc -- Execute a SELECT statement using OPENXML rowset provider. SELECT * FROM OPENXML (@idoc, '/root/Customer/Order', 1) WITH (oid char(5), amount float, comment ntext 'text()') EXEC sp_xml_removedocument @idoc ??????? /**********************Excel导到Txt****************************************/ 想用 select * into opendatasource(...) from opendatasource(...) 实现将一个Excel文件内容导入到一个文本文件 假设Excel中有两列，第一列为姓名，第二列为很行帐号(16位) 且银行帐号导出到文本文件后分两部分，前8位和后8位分开。 邹健： 如果要用你上面的语句插入的话,文本文件必须存在,而且有一行:姓名,银行账号1,银行账号2 然后就可以用下面的语句进行插入 注意文件名和目录根据你的实际情况进行修改. insert into opendatasource('MICROSOFT.JET.OLEDB.4.0' ,'Text;HDR=Yes;DATABASE=C:\' )...[aa#txt] --,aa#txt) --*/ select 姓名,银行账号1=left(银行账号,8),银行账号2=right(银行账号,8) from opendatasource('MICROSOFT.JET.OLEDB.4.0' ,'Excel 5.0;HDR=YES;IMEX=2;DATABASE=c:\a.xls' --,Sheet1$) )...[Sheet1$] 如果你想直接插入并生成文本文件,就要用bcp declare @sql varchar(8000),@tbname varchar(50) --首先将excel表内容导入到一个全局临时表 select @tbname='[##temp'+cast(newid() as varchar(40))+']' ,@sql='select 姓名,银行账号1=left(银行账号,8),银行账号2=right(银行账号,8) into '+@tbname+' from opendatasource(''MICROSOFT.JET.OLEDB.4.0'' ,''Excel 5.0;HDR=YES;IMEX=2;DATABASE=c:\a.xls'' )...[Sheet1$]' exec(@sql) --然后用bcp从全局临时表导出到文本文件 set @sql='bcp "'+@tbname+'" out "c:\aa.txt" /S"(local)" /P"" /c' exec master..xp_cmdshell @sql --删除临时表 exec('drop table '+@tbname) /********************导整个数据库*********************************************/ 用bcp实现的存储过程 /* 实现数据导入/导出的存储过程 根据不同的参数,可以实现导入/导出整个数据库/单个表 调用示例: --导出调用示例 ----导出单个表 exec file2table 'zj','','','xzkh_sa..地区资料','c:\zj.txt',1 ----导出整个数据库 exec file2table 'zj','','','xzkh_sa','C:\docman',1 --导入调用示例 ----导入单个表 exec file2table 'zj','','','xzkh_sa..地区资料','c:\zj.txt',0 ----导入整个数据库 exec file2table 'zj','','','xzkh_sa','C:\docman',0 */ if exists(select 1 from sysobjects where name='File2Table' and objectproperty(id,'IsProcedure')=1) drop procedure File2Table go create procedure File2Table @servername varchar(200) --服务器名 ,@username varchar(200) --用户名,如果用NT验证方式,则为空'' ,@password varchar(200) --密码 ,@tbname varchar(500) --数据库.dbo.表名,如果不指定:.dbo.表名,则导出数据库的所有用户表 ,@filename varchar(1000) --导入/导出路径/文件名,如果@tbname参数指明是导出整个数据库,则这个参数是文件存放路径,文件名自动用表名.txt ,@isout bit --1为导出,0为导入 as declare @sql varchar(8000) if @tbname like '%.%.%' --如果指定了表名,则直接导出单个表 begin set @sql='bcp '+@tbname +case when @isout=1 then ' out ' else ' in ' end +' "'+@filename+'" /w' +' /S '+@servername +case when isnull(@username,'')='' then '' else ' /U '+@username end +' /P '+isnull(@password,'') exec master..xp_cmdshell @sql end else begin --导出整个数据库,定义游标,取出所有的用户表 declare @m_tbname varchar(250) if right(@filename,1)'\' set @filename=@filename+'\' set @m_tbname='declare #tb cursor for select name from '+@tbname+'..sysobjects where xtype=''U''' exec(@m_tbname) open #tb fetch next from #tb into @m_tbname while @@fetch_status=0 begin set @sql='bcp '+@tbname+'..'+@m_tbname +case when @isout=1 then ' out ' else ' in ' end +' "'+@filename+@m_tbname+'.txt " /w' +' /S '+@servername +case when isnull(@username,'')='' then '' else ' /U '+@username end +' /P '+isnull(@password,'') exec master..xp_cmdshell @sql fetch next from #tb into @m_tbname end close #tb deallocate #tb end go /************* Oracle **************/ EXEC sp_addlinkedserver 'OracleSvr', 'Oracle 7.3', 'MSDAORA', 'ORCLDB' GO delete from openquery(mailser,'select * from yulin') select * from openquery(mailser,'select * from yulin') update openquery(mailser,'select * from yulin where id=15')set disorder=555,catago=888 insert into openquery(mailser,'select disorder,catago from yulin')values(333,777) 补充： 对于用bcp导出,是没有字段名的. 用openrowset导出,需要事先建好表. 用openrowset导入,除ACCESS及EXCEL外,均不支持非本机数据导入
计算机名词解释
曾经对很多熟悉的计算机名词并不是真的具体了解其含义，因此自己整理了一下，计算机名词解释，计算机词语
什么是Microsoft Visual FoxPro？
Microsoft Visual FoxPro (short VFP) is a programming language with it’s own IDE and database, ranking somewhat between Access and VB.NET + SQL Server (Express). Microsoft Visual F...
Visual FoxPro 6.0中文版初级教程
Visual FoxPro（VFP）是一款由Microsoft开发的关系型数据库管理系统，因其快速、灵活的数据管理能力而受到广泛欢迎。自1992年首次发布以来，它经历了多个版本的迭代与优化，每一个版本都融入了新的技术与改进，满足了不断增长的业务需求。从1992年发布第一个版本开始，Visual FoxPro持续进化，加入了对面向对象编程的支持，并提供了更加丰富的工具和库。在早期版本中，重点在于快速开发桌面和小型网络应用。
MS-SQL Server

34,838

社区成员

254,632

社区内容

发帖
与我相关
我的任务
社区描述
MS-SQL Server相关内容讨论专区
社区管理员
  • 基础类社区
  • 二月十六
  • 卖水果的net
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章