这样可以执行
For Each jt As JProperty In jb.Properties
output.show("key2 : " & jt.name.ToString())
output.show("value2 : " & jt.value.ToString())
Next
老的项目里,这样执行,也可以
arrContent(i) :
js前端代码
var addData = {
角色ID : roleID,
控件ID : addControlIDs[i],
可用 : 1,
创建者 : creater,
修改者 : creater
};
ajaxData.content.push( addData);
foxtable代码:
For Each jp As JProperty In arrContent(i)
' ACCESS的日期没有处理
If dt.DataCols(jp.name).IsDate Then
If jp.value.ToString.Replace("'","''") = "" Then
strValue = strValue & "[" & jp.name.ToString & "] = null ,"
Else ' 未考虑access的日期方式 "#2021/03/20#"
If jp.value.ToString = "needServerTime" Then ' 如果需要服务器时间,则使用, 否则使用前端值
strValue = strValue & "[" & jp.name.ToString & "] = '" & Time & "',"
Else
strValue = strValue & "[" & jp.name.ToString & "] = '" & jp.value.ToString.Replace("'","''") & "',"
End If
End If