MyDataGrid一个例子

最新推荐文章于 2021-03-29 00:14:21 发布

VIP文章 xuandhu

最新推荐文章于 2021-03-29 00:14:21 发布

阅读量1.3k

点赞数

分类专栏： ASP.NET三组件文章标签： hyperlink datagrid asp server string object

版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文链接：https://blog.csdn.net/xuandhu/article/details/179460

版权

<<%@ Page Language="VB" AutoEventWireup="True" %>
<%@ Import Namespace="System.Data" %>

<html>
<script runat="server">

Private Store As DataTable = New DataTable()
Private StoreView As DataView

      Sub Page_Load(sender As Object, e As EventArgs)

         If IsNothing(Session("StoreData")) Then

            Dim dr As DataRow
            Dim i As Integer

            Store = New DataTable()

            Store.Columns.Add(New DataColumn("Tax", GetType(String)))
            Store.Columns.Add(New DataColumn("Item", GetType(String)))
            Store.Columns.Add(New DataColumn("Price", GetType(String)))

            Session("StoreData") = Store

            ' Create sample data.
            For i = 1 to 4

               dr = Store.NewRow()

               dr(0) = "0.0%"
               dr(1) = "Item " & i.ToString()
               dr(2) = (1.23 * (i + 1)).ToString()

               Store.Rows.Add(dr)

最低0.47元/天解锁文章

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
MyDataGrid一个例子

> Private Store As DataTable = New DataTable() Private StoreView As DataView Sub Page_Load(sender As Object, e As EventArgs) If IsNothing(Session("StoreData"
复制链接

扫一扫

专栏目录

xuandhu CSDN认证博客专家 CSDN认证企业博客

码龄20年

248: 原创

19万+: 周排名

68万+: 总排名

51万+: 访问

: 等级

3472: 积分

20: 粉丝

13: 获赞

105: 评论

33: 收藏

私信

关注

热门文章

分类专栏

最新评论

管家婆排序
xuandhu: SELECT Dlyndx.date, Dlyndx.vchcode, Btype.fullname, Dly.qty, Dly.price,; Dly.drecno_p; FROM dly RIGHT OUTER JOIN dlyndx; LEFT OUTER JOIN btype ; ON Dlyndx.drecno_b = Btype.rec_no ; ON Dly.vchcode = Dlyndx.vchcode; INTO TABLE temp1.dbf SELECT Temp1.fullname, Ptype.fullname, Temp1.qty, Temp1.price, Temp1.date,; Temp1.vchcode; FROM temp1 INNER JOIN ptype ; ON Temp1.drecno_p = Ptype.rec_no; ORDER BY Temp1.fullname, Ptype.fullname, Temp1.date; INTO TABLE temp2.dbf
html关于画细线的高级方法
程序小白学程序: 不能自适应手机
管家婆数据排序
xuandhu: * design by xuhu 20210315* 查询全部定单并排序*********************************说明：* DLYNDX.DBF 加字段recn_no, 数字型* 暂时没有过滤红字反冲* 表说明：* DLYNEX 单据编号 DLY 单据明细* PTYPE 商品名称*SET CENTURY ONset date ymdSet Mark To [-]* 日期为 yyyy-mm-dd*路径为当前的SET DEFAULT TO "d:\xuhu\管家婆\data - 副本\"CLEARclose all databaseUSE BTYPEIF gamyarray(afields(gamyarray),1) <> "REC_NO" alter table btype add REC_NO n(6) REPLACE ALL REC_NO WITH RECNO()ENDIFUSE PTYPEIF gamyarray(afields(gamyarray),1) <> "REC_NO" alter table btype add REC_NO n(6) REPLACE ALL REC_NO WITH RECNO()ENDIF*2.qprSELECT Dly.date, Dly.vchcode, Dly.drecno_b, Ptype.fullname, Dly.qty,; Dly.price, Dly.comment; FROM dly INNER JOIN ptype ; ON Dly.drecno_p = Ptype.rec_no ; INTO TABLE temp1.dbf USE temp1.dbf BROWSE * 3.qpr * btype.dbf 客户名 SELECT Temp1.date, Temp1.vchcode, Btype.fullname, Temp1.fullname,; ABS(Temp1.qty), Temp1.price, Temp1.comment; FROM temp1 LEFT OUTER JOIN btype ; ON Temp1.drecno_b = Btype.rec_no; ORDER BY Btype.fullname, Temp1.fullname, Temp1.date INTO TABLE temp2.dbfCLOSE ALL DATABASE USE temp2.dbf BROWSE *EXCEL版本只能显示前 16,384 行* COPY TO "d:\xuhu\管家婆\data - 副本\1.xls" TYPE XL5 COPY TO "d:\xuhu\管家婆\data - 副本
管家婆辉煌版7.2版，超级用户密码忘记了
不倾世@只倾你一人: 这个网址是什么

您愿意向朋友推荐“博客详情页”吗？

强烈不推荐
不推荐
一般般
推荐
强烈推荐

提交

最新文章

目录

评论

被折叠的条评论为什么被折叠?

到【灌水乐园】发言

查看更多评论

添加红包

成就一亿技术人!

hope_wisdom

发出的红包

实付元

使用余额支付

点击重新获取

扫码支付

钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。