get_selects.bak

来自「撒撒娇快乐就好空间看了我忘了拍相片在来记录卡连接可卡拉上了塑料卡设计askals」· BAK 代码 · 共 16 行

Procedure Get_SelectS
	Parameters This_Value										&&接收要查询的关键字
	Select_Cursor=[Sptemp]									&&要查询的表或者临时表
	Pers_Name=[SpName]											&&要查询的字段名:姓名
	Pers_PyCode=[SpPy]										&&要查询的字段名:拼音简码

	Select SpName From Sptemp;
		Where Like(Upper(Alltrim(This_Value))+[*],;
		IIF(Asc(This_Value)>122,;
		SpName,;
		Sppy));
		Into Cursor Get_Select;
		GROUP BY SpName;
		ORDER BY SpName ReadWrite
	Use In Sptemp