开启服务HttpServer.Prefixes.Add("http://*:81/")
HttpServer.WebPath = "d:\web" '指定静态文件存储位置
HttpServer.Start()
在web文件夹新建 ceshi.html 文件代码如下
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<title>数据列表测试</title>
<script src="easyui/jquery.min.js"></script>
<script src="easyui/jquery.easyui.min.js"></script>
<script src="easyui/locale/easyui-lang-zh_CN.js"></script>
<link rel="stylesheet" href="easyui/themes/default/easyui.css">
<link rel="stylesheet" href="easyui/themes/icon.css">
<link rel="stylesheet" href="easyui/themes/color.css">
</head>
<body>
<div id="t1"></div>
<script src="table.js"></script>
</body>
</html>
在wen文件夹下 新建 table.js文件代码如下
$(function () {
$('#t1').datagrid({
title: '数据表',
iconCle: 'icon-search',
width: 800,
height: 600,
collapsible: true,
columns:[[
{field:'序号',title:'序号'},
{field:'星级',title:'星级'}
]],
url:'设置_星级'
})
})
现在网页端界面 打开ceshi.html的时候已经可以看到表格界面
在foxtable HttpRequst事件 代码如下
Select Case e.path
Case "设置_星级"
e.AsyncExecute = True '通知系统返回数据
Functions.AsyncExecute("getdata",e) '异步调用
End Select
Dim e As RequestEventArgs = args(0) '获取传递过的e参数
Dim cmd As List(of DataRow) = DataTables("设置_星级").Select("","日期 Desc")
Dim ja As new jarray
Dim i As Integer
For Each DR As DataRow In DT.DataRowS
ja.add(new jobject)
ja(i)("序号") = dr("序号").Tostring
ja(i)("星级") = dr("星级").Tostring
Next
e.WriteString(CompressJson(ja))
e.handled = True
点击确定的时候 报错
编译错误:"e"已声明未此方法的一个参数.
错误代码:Dim e As RequestEventArgs = args(0) '获取传递过的e参数
请帮忙看看后面的代码是否可以完成数据返回,在网页打开ceshi.html网页的时候,看到foxtable 设置_星级 里的数据
学习到这个地方,有点乱请大神指教一下,学习方法.
加好友 
发短信
Post By：2020/11/11 9:49:00 [显示全部帖子]
