Server-Script公共代码
DeleteRows(函数在wunway中)
功能:
删除指定表记录
参数:
{Table,OrigrecList} Table表名,OrigrecList标识符列表, 必须为Origrec ,为数组。
返回值:无
还有一种写法,就是自定义删除函数,由于每个表格绑定一个数据源,所以只要传入一个控件名字,然后获取数据库表格名字, 执行后边的删除语句
具体代码如下:
![](https://images.cnblogs.com/OutliningIndicators/ContractedBlock.gif)
1 function DeleteRows_diy(dg, TableName ) 2 { 3 if(TableName == null || TableName == "") //判断传过来的数据库表格名字是否为空,如果为空,则根据控件获取表格名字 4 { 5 TableName = dg.RootTable.DataMember; //获取表格名字 6 } 7 if(dg.RowCount < 1) //如果删除的表格行数少于1,则返回,删除失败 8 return; 9 10 //调用弹出窗,确定是否删除,返回值为YES和其他值NO。,然后赋值给okToDelete 11 var okToDelete = Dialogs.MessageBox(form.Resources("mesAreYouSureDel"), form.Resources["Question"], "YESNO", "QUESTION"); 12 if (okToDelete == "YES") //如果为YES ,则执行删除 13 { 14 var OrigrecList = dg.GetSelectedRowsData("ORIGREC"); //获取当前行。可多行 15 lims.CallServer("Sunway.DeleteRows",[TableName,OrigrecList]); //往DeleteRows传入表格名和唯一值Origrec,执行删除操作 16 dg.Refresh(); //刷新表格 17 return true; //返回刷新成功 18 } 19 else return; //返回 20 }
Update
功能:
更新某个表中的某个字段的值
参数:
{TableName,FieldName, FieldValue,Origrec} TableName表名,FieldName字段名,FieldValue 字段值,Origrec唯一标识符
返回值:无
2 :PARAMETERS TableName, UpdateFieldName, UpdateFieldValue, PkFieldValue, PkFieldName, Datasource; 3 :DEFAULT PkFieldName, "ORIGREC"; 4 :DEFAULT Datasource, "DATABASE"; 5 :RETURN SqlExecute("update " + TableName + " set " + UpdateFieldName + " = ?UpdateFieldValue? where " + PkFieldName + " = ?PkFieldValue? ", Datasource);
Find
功能:
按照某列查找
参数:
{TableName,FieldName,FieldValue} TableName表名,FieldName字段名,FieldValue字段值
返回值:返回找到的第一个列值,并且定位到上面。