VB读取ACCESS数据库

VB读取ACCESS数据库,第1张

Set

dbs

=

OpenDatabase(App.Path

+

"\APP\TL.mdb")

参数不对:workspace.OpenDatabase(数据库名,打开模式,是否只读,连接字符串)

Set

dbs=Workspaces(0).OpenDatabase(App.Path+"\APP\TL.mdb",False,False,"MS

AccessPWD=***")

'下面引用ADO2.1

Private

Sub

Command1_Click()

On

Error

GoTo

aa:

Dim

dbs

As

New

Connection

'定义为数据库类型

Dim

rst

As

Recordset

'定义为记录类型

Dim

theday

As

Date

'定义为日期类型

Dim

connstr

As

String

Dim

i

As

Integer

Dim

Bcell,

Ecell,

SQLString

As

String

Set

ExcelReport

=

New

Excel.Application

ExcelReport.Workbooks.Open

FileName:=App.Path

+

"\APP\脱硫系统运行日志.xls"

ExcelReport.DisplayAlerts

=

False

Set

Sheet1

=

ExcelReport.Sheets("Sheet1")

Set

Sheet2

=

ExcelReport.Sheets("Sheet2")

Set

Sheet3

=

ExcelReport.Sheets("Sheet3")

Set

Sheet4

=

ExcelReport.Sheets("Sheet4")

Sheet1.Activate

theday

=

Day(CDate(DTPicker1.Value))

connstr

=

"DBQ="

+

App.Path

+

"\APP\TL.mdb"

+

"DefaultDir=DRIVER={Microsoft

Access

Driver

(*.mdb)}"

Set

dbs

=

New

Connection

dbs.Open

connstr

'dbs.Execute

"delete

from

day1

"

SQLString

=

"select

*

from

TL1

where

DT='"

&

CStr(DTPicker1.Value)

&

"'"

dbs.Execute

SQLString

Set

rst

=

dbs.Execute("select

*

from

TL1")

If

rst.EOF

=

False

Then

rst.MoveFirst

End

If

ExcelReport.Visible

=

True

i

=

0

While

rst.EOF

=

False

i

=

i

+

1

Sheet1.Cells(i

+

7,

2)

=

rst!GLFH

Sheet1.Cells(i

+

7,

3)

=

rst!PH

Sheet1.Cells(i

+

7,

4)

=

rst!TFTW

Sheet1.Cells(i

+

7,

5)

=

rst!TFMD

Sheet1.Cells(i

+

7,

6)

=

rst!JT1

Sheet1.Cells(i

+

7,

7)

=

rst!CT1

Sheet1.Cells(i

+

7,

8)

=

rst!JP1

Sheet1.Cells(i

+

7,

9)

=

rst!CP1

Sheet1.Cells(i

+

7,

10)

=

rst!CWSP

Sheet1.Cells(i

+

7,

11)

=

rst!CWXP

Sheet1.Cells(i

+

7,

12)

=

rst!XAI

Sheet1.Cells(i

+

7,

13)

=

rst!XBI

Sheet1.Cells(i

+

7,

14)

=

rst!XCI

Sheet1.Cells(i

+

7,

15)

=

rst!MAI

Sheet1.Cells(i

+

7,

16)

=

rst!MBI

Sheet1.Cells(i

+

7,

17)

=

rst!YAI

Sheet1.Cells(i

+

7,

18)

=

rst!YAP

Sheet1.Cells(i

+

7,

19)

=

rst!YBI

Sheet1.Cells(i

+

7,

20)

=

rst!YBP

Sheet1.Cells(i

+

7,

21)

=

rst!SHAP

Sheet1.Cells(i

+

7,

22)

=

rst!SHBP

Sheet1.Cells(i

+

7,

23)

=

rst!SH_4MIDU

Sheet1.Cells(i

+

7,

24)

=

rst!SGAI

Sheet1.Cells(i

+

7,

25)

=

rst!SGBI

Sheet1.Cells(i

+

7,

26)

=

rst!MFT

Sheet1.Cells(i

+

7,

27)

=

rst!MFP

rst.MoveNext

Wend

ExcelReport.Visible

=

True

GoTo

cc

aa:

ExcelReport.DisplayAlerts

=

False

dbs.Close

Set

dbs

=

Nothing

Unload

Me

cc:

End

Sub

打开WinEdit,进入在options->Execution Modes中

在Console Application中选择自己的编译方式,这里我选择了TeXify,选择其他项的设置方式一样。找到Wait For Execution to finish 那项,将Start Viewer的勾去掉,就停止了自动预览。

下一步,找到dvi2pdf,设置转pdf之后自动打开预览,这样比较方便我们查看PDF文件。

设置完毕,运行一下,先点Texify,编译完成,Yap并没有自动d出,但是发现系统消息里有没有编译的报告了(就是告诉你有几个警告几个错误的报告)

原来刚才把TeXify中的Show Report也给取消了,这项还是很有用的,可以看到编译的结果,所以把它勾选上。

重新编译,结果如下,就能看到编译的结果了。生成dvi文件之后再点击dvi2pdf按钮,就会生成PDF文件了,而且会自动打开,免去了手动打开的时间。

CTEX首页上的下载中心:

http://www.ctex.org/modules.php op=modload&name=Downloads&file=index

或者直接到本站的FTP服务器上下载:

ftp://ftp.ctex.org/pub/tex/systems/ctex/

CTEX常见问题集

Leo Aloft (aloft@ctex.org)

2003年3月11日

本文的大部分内容都来自于CTEX BBS上的讨论.目前一共收录有30个问题.这份常见问题集的最新

版本可以在CTEX网站上找到.

本文档的主要目的是帮助你快速的找到问题的答案,因此可能不是非常详细.如果你想系统的学习

TEX和LAT

EX请参考专门的资料(见问题

28).

目录

A关于CTEX2

1 CTEX是干什么的 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .2

2 CTEX网站包括几个部分 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .3

B基本概念3

3什么是TEX . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .3

4 LATEX是什么 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .3

5什么是AMSTEX/AMSLATEX . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .4

6 TEX和LATEX是什么关系 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .4

7 MiKTEX,fpTEX,teTEX,CTEX又是什么关系 . . . . . . . . . . . . . . . . . . . . . . .4

C安装升级4

8哪里可以下载CTEX中文套装软件 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ..4

9哪里可以下载MiKTEX的最新版本 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5

10如何升级现有的MiKTEX . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5

11什么. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5

12我下载了一些新的宏包,该如何安装到我的系统中去 . . . . . . . . . . . . . . . . . . . . .5

D使用入门6

13能否举一个简单的英文排版例子 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .6

14如何使首段段首也缩进 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .6

15怎样象第几章一样,将参考文献也加到目录 . . . . . . . . . . . . . . . . . . . . . . . . . .6

16如何生成分栏的文档 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .6

1

E中文支持7

17比较一下CJK与CCT的优缺点 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .7

18能否举一个简单的中文排版例子 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ..7

19如何使段首缩进两个中文字符宽度 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .7

F数学公式7

20如何实现定理,定义,推论等的统一编号 . . . . . . . . . . . . . . . . . . . . . . . . . . . .7

21实数域R或复数域C等的字体该用什么命令 . . . . . . . . . . . . . . . . . . . . . . . . . .8

22书中向量常用斜体加黑体表示,该用什么体命令排版 . . . . . . . . . . . . . . . . . . . .8

23如何实现如(1.1a) (1.1b)这种公式编号 . . . . . . . . . . . . . . . . . . . . . . . . . . . . .8

G表格图形8

H高级技术8

24\makeatletter和\makeatother是干什么用的 . . . . . . . . . . . . . . . . . . . . . . . .8

I辅助工具9

25 WinEdt和GSview经常出现过期和注册提示,如何解决 . . . . . . . . . . . . . . . . . . .9

26如何去掉WinEdt的自动断行和自动续行 . . . . . . . . . . . . . . . . . . . . . . . . . . . .9

27 Yap里如何预览带有颜色的EPS图片 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .9

J帮助文档9

28能. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .9

29有没有关于LATEX宏包的详细说明 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .9

30我的问题没找到答案,或者有答案但是解决不了我的问题,怎么办 . . . . . . . . . . . . .10

参考文献10

索引11

A关于CTEX

1 CTEX是干什么的

CTX是一个关于TEX的中文网站,CTEX是中文TEX的缩写.CTEX的宗旨是为中国广大的TEX用

户提供力所能及的帮助.目前CTEX的主要工作包括维护CTEX网站,为用户提供学习交流的场所开发

中文TEX系统安装配置软件致力于TEX文档的中文化工作.CTEX的服务器和网络接入得到了中国科学

院数学与系统科学研究院的支持.

2

2 CTEX网站包括几个部分

目前CTEX主要有三个部分:

http://www.ctex.org

主页,发布最新软件,消息

http://bbs.ctex.org

论坛,提问,讨论问题

ftp://ftp.ctex.org

FTP,提供软件资料下载,交流

B基本概念

3什么是TEX

电子排版系统的出现给印刷出版业带来了一场革命,利用电子计算机及各种辅助设备,可以完成从文

稿,图表的录入,编辑,修改,组版,直至得到各种不同用途,不同质量的输出结果.利用电子排版系

统,可以减轻劳动强度,缩短出版周期.

目前世界上有许多电子排版系统.这些系统各有特点,也各有自己的适用范围.TEX就是一种优秀的

电子排版系统.

TEX提供了一套功能强大并且十分灵活的排版语言,它多达900多条指令,并且TEX有宏功能,用户

可以不地定义自己适用的新命令来扩展TEX系统的功能.许多人利用TEX提供的宏定义功能对TEX进

行了二次开发,其中比较著名的有美国数学学会推荐的非常适合于数学家使用的AMSTEX以及适合于一般

文章,报告,书籍的LATEX系统.

TEX系统是公认的数学公式排得最好的系统.美国数学学会(AMS)鼓励数学家们使用TEX系统向

它的期刊投稿.世界上许多一流的出版社如Kluwer,Addison-Wesley,牛津大学出版社等也利用TEX系统

出版书籍和期刊.

大部分的TEX系统都是免费的.Knuth教授还公开了他的全部源程序.TEX系统目前已经在数百种计

算机系统上得到实现.TEX系统的排版结果DVI(DeViceIndependent)文件与输出设备无关.DVI文件可

以显示,打印,照排,几乎可以在所有的输出设备上输出.TEX排版源文件及结果在各种计算机系统上互

相兼容.

4 LATEX是什么

Leslie Lamport开发的LATEX是当今世界上最流行和使用最为广泛的TEX宏集.它构筑在Plain TEX

的基础之上,并加进了很多的功能以使得使用者可以更为方便的利用TEX的强大功能.使用LATEX基本上

不需要使用者自己设计命令和宏等,因为LATEX已经替你做好了.因此,即使使用者并不是很了解TEX,

也可以在短短的时间内生成高质量的文档.对于生成复杂的数学公式,LATEX表现的更为出色.

LATEX自从八十年代初问世以来,也在不断的发展.最初的正式版本为2.09,在经过几年的发展

之后,许多新的功能,机制被引入到LATEX中.在享受这些新功能带来的便利的同时,它所伴随的

副作用也开始显现,这就是不兼容性.标准的LATEX 2.09引入了"新字体选择框架"(NFSS)的

LATEX,SLiTEX,AMSLATEX等等,相互之间并不兼容.这给使用者和维护者都带来很大的麻烦.为结束

这中糟糕的状况,FrankMittelbach等人成立了LATEX3项目小组,目标是建立一个最优的,有效的,统

3

一的,标准的命令集合.即得到LATEX的一个新版本3.这是一个长期目标,向这个目标迈出第一步就

是在1994年发布的LATEX2e.LATEX2e采用了NFSS作为标准,加入了很多新的功能,同时还兼容旧的

LATEX 2.09.LATEX2e每6个月更新一次,修正发现的错误并加入

前,LATEX2e将是标准的

5什么是AMSTEX/AMSLATEX

AMSTEX是美国数学会提供的,在Plain TEX基础上开发的TEX宏集.它主要用于排版含有很多数学

符号和公式的科技类文章或书籍.AMSTEX给出了许多高级命令,可以让使用者很方便地排版大型的,

复杂的数学公式.AMSTEX排版数学公式等的功能通过AMSLATEX中的宏包amsmath在LATEX中得到实

现.AMSTEX目前的版本为2.1.AMSLATEX包括两部分,一是上面提到的amsmath宏包,主要的目的是用来排版数学符

一部分是amscls,提供了美国数学会要求的论文和书籍的格式.AMSLATEX目前的版本为2.0

在提供AMSTEX和AMSLATEX的同时,美国数学会还提供一套数学符号的字库,AMSFonts

库中增加了很多T

E

X的标准字库ComputerModern所没有的一些数学符号,粗体数学符号等

现在的版本为2.2,有Metafont和Type1两种字库提供下载.

6 TEX和LATEX是什么关系

LATEX是建立在TEX基础上的宏语言,也就是说,每一个LATEX命令实际上最后都会被转换解释成几

个甚至上百个TEX命令.但是,普通用户可以无需知道这中间的复杂联系.就象编程的时候如果使用一些

已经编译好的函数库可以使我们仅仅用几个命令就实现很多功能一样,LATEX根据人们排版文章的习惯,

定义了许多命令和模板,通过这些命令和模板,我们可以很快的得到漂亮的排版结果.

7 MiKTEX,fpTEX,teTEX,CTEX又是什么关系

TEX在不同的硬件和 *** 作系统上有不同的实现版本.这就像C语言,在不同的 *** 作系统中有不同的编

译系统,例如Linux下的gcc,Windows下的VisualC++等.有时,一种 *** 作系统里也会有好几种的TEX

系统.目前常见的Unix/Linux/的TEX系统是teTEX,Windows下则有MiKTEX和fpTEX.CTEX指的

是CTEX中文套装的简称,是把MiKTEX和一些常用的相关工具,如GSview,WinEdt等包装在一起制作

的一个简易安装程序,并对其中的中文支持部分进行了配置,使得安装后马上就可以使用中文.

C安装升级

8哪里可以下载CTEX中文套装软件

CTEX首页上的下载中心:

http://www.ctex.org/modules.php op=modload&name=Downloads&file=index

或者直接到本站的FTP服务器上下载:

ftp://ftp.ctex.org/pub/tex/systems/ctex/

4

9哪里可以下载MiKTEX的最新版本

可以到MiKTEX的主页:

http://www.miktex.org

或者本站提供的CTAN镜像中下载:

ftp://ftp.ctex.org/CTAN/systems/win32/miktex/setup/setup.exe

然后执行setup.exe,在其提供的站点列表中选择合适的网站(CTEX FTP是列表中唯一的中国大陆网

站),按照程序提示即可完成下载.

10如何升级现有的MiKTEX

无论是CTEX中文套装包含的MiKTEX还是单独安装的MiKTEX都可以使用以下方法升级(只适用于

MiKTEX 2.2以后版本)运行开始菜单中MiKTEX组中的MiKTEXUpdateWizard,在其中提供的站点列

表中选择合适的网站,则程序会自动完成下载所需的文件并升级.也可以使用安装时的程序setup.exe把最

新的内容下载到你的硬盘上以后,再运行MiKTEX Update Wizard并选择从本地(local)升级.

11什么是文件名数据库 怎么刷新

TEX系统通过这个数据库记录了所需要的各种文件的名字和具体目录位置.每次你往系统中添加文件

后,都要记得刷新这个数据库,否则TEX有可能找不到需要的文件.

刷新文件名数据库的具体命令取决于你使用的TEX系统.teTEX和fpTEX的命令是

texhash

MiKTEX用的是

initexmf --update-fndb

或者使用图形界面工具MiKTEX Optionsb

12我下载了一些新的宏包,该如何安装到我的系统中去

如果你得到的宏包已经是编译过的,也就是已经有.sty或者.cls文件,你只需把这些文件放在

localtexmf/tex/latex/

/的某个子目录中,可以自己建一个.然后你还要让TEX系统知道这个新的宏包的存在,你需要刷新系统

的文件名数据库(见11).现在你可以使用这个宏包了.

你也可以把这些宏包文件和你的TEX源文件放在同一目录下,这种情况下你不需要刷新系统的文件名

数据库,但只有同一个目录下的文件可以使用这些宏包.

如果你拿到的是宏包的源文件,一般来说都包含两个文件:一个扩展名为.ins,另一个扩展名为

.dtx.此外,通常会有一个readme.txt对宏包进行简要的说明.你应该先阅读这个文件.对.ins文件运

行LATEX命令会产生一个.sty文件.然后参照上面的做法.你还可以从这些源文件中产生帮助文档,具体

请参见lshort [1].

5

D使用入门

13能否举一个简单的英文排版例子

\documentclass{article}

\begin{document}

This is a test file.

\end{document}

14如何使首段段首也缩进

使用indentrst宏包:

\usepackage{indentrst}

15怎样象第几章一样,将参考文献也加到目录

在参考文献部分之前加入

\clearpage %双面打印(twoside)请使用\cleardoublepage

\addcontentsline{toc}{chapter}{参考文献}

语句即可.

16如何生成分栏的文档

如果全文都是双列分栏格式,可以在\documentclass命令中加入参数twocolumn.例如:

\documentclass[twocolumn]{article}

如果要生成单双列混合的分 格式,甚至更多列的格式,则要用到multicol宏包:

\usepackage{multicol}

然后将需要多列的地方使用:

\begin{multicols}{n}

\end{multicols}

包含起来.这里的n就是想要的列数.

6

E中文支持

17比较一下CJK与CCT的优缺点

CJK比CCT的优越之处有以下几点:

1.字体定义采用LATEX NFSS标准,生成的DVI文件不必像CCT那样需要用patchdvi处理后才能预览

和打印.而且一般GB编码的文件也不必进行预处理就可直接用LATEX命令进行编译.

2.可使用多种TrueType体和Type1字体,生成的PDF文件更清楚,漂亮.

3.能同时在文章中使用多种编码的文字,如中文简体,繁体,日文,韩文等.

当然,CCT在一些细节上,如字体可用中文字号,字距,段首缩进等更符合中文的习惯.而CJK就

没有针对中文习惯指定特殊的排版标准.

目前,CCT的作者已经推出了最新版的CCT,可以使用CJK的字库,从而也避免了预处理和

patchdvi的过程,使用更方便,排版效果更美观了.最新版的CCT可以在

ftp://ftp.cc.ac.cn/pub/cct/

下载,或者使用CTEX提供的工具升级.

18能否举一个简单的中文排版例子

在安装好CJK的系统中,下面这个例子可以象英文文档一样的编译(见问题13)得到正确的输出.

\documentclass{article}

\usepackage{CJK}

\begin{document}

\begin{CJK*}{GBK}{kai}

这是中文楷体字.

\end{CJK*}

\end{document}

19如何使段首缩进两个中文字符宽度

在CJK环境中使用\CJKin命令.

F数学公式

20如何实现定理,定义,推论等的统一编号

现在很多文章的定理,定义,推论,例子都采用统一编号,不再是独立编号.如定义1.1,接下来可能

是定理1.2,然后推论1.3,等等.这可以用如下的定义来完成:

\newtheorem{thm}{Theorem}[section] %如果不采用章节号做前缀,则不用[section]

\newtheorem{defn}[thm]{Definition} %这句定义使得defn环境和thm共享编号

\newtheorem{lem}[thm]{Lemma} %这句定义使得lem环境和thm共享编号

7

21实数域R或复数域C等的字体该用什么命令

使用amsmath宏包:

\usepackage{amsfonts}

然后用\mathbb命令,例如:

$x \in \mathbb{R}$ and $c \in \mathbb{C}$x2Randc2C

22书中向量常用斜体加黑体表示,该用什么字体命令排版

使用bm宏包:

\usepackage{bm}

然后用\bm命令,例如:

${\bm x}^T {\bm y}$xTy

23如何实现如(1.1a) (1.1b)这种公式编号

使用amsmath宏包:

\usepackage{amsmath}

例子:

\begin{subequations}

\begin{equation}

A = B

\end{equation}

\begin{equation}

C=D

\end{equation}

\end{subequations}

A=B(1a)

C=D(1b)

所有在一对subequations中的公式共享一个主编号(例子中的1).

G表格图形

H高级技术

24\makeatletter和\makeatother是干什么用的

一些LATEX内部命令含有@字符,如\@addtoreset,如果需要在文档中使用这些内部命令,就需要借

助于另两个命令\makeatletter和\makeatother.

下面的例子可以实现公式编号与节号的关联:

8

\documentclass{article}

...

\makeatletter % @ is now a normal "letter" for TeX

\renewcommand\theequation{\thesection.\arabic{equation}}

\@addtoreset{equation}{section}

\makeatother%@isrestoredasa"non-letter"characterforTeX

\begin{document}

...

I辅助工具

25 WinEdt和GSview经常出现过期和注册提示,如何解决

WinEdt和GSview是共享软件,需要注册才能使用全部功能,如果你不能忍受它的提示,那就只有花

钱注册了.

26如何去掉WinEdt的自动断行和自动续行

点击WinEdt状态栏上的Wrap使其变为灰色可以完全禁止WinEdt的自动断行和自动续行.在行首加

入空格或者Tab符可以防止自动续行(将本行并入上一行).

在WinEdt的菜单Options下选择Perferences,在d出的对话框中的Editor页的右下角可以设置Right

Margin来修改WinEdt判断自动断行的字符数.

27 Yap里如何预览带有颜色的EPS图片

打开Yap的菜单Views下的Options,在d出的对话框中选择PostScript,然后在Quality的下拉框中

选择16millioncolors.

J帮助文档

28能否推荐一些比较好的中文资料

目前TEX和LATEX的中文资料还不是很多,特别是相对大量的英文资料而言.如果你刚开始学习

LATEX,我们推荐你使用lshort中文版[1].这是一份很好的入门学习教材.它的最新版本可以在CTEX网站

免费下载.

如果你需要一本详细的LATEX命令手册,我们推荐使用邓建松等人翻译整理的LATEX2e科技排指南

一书[2].这本书可以说是目前国内正式出版的LATEX书籍中最值得购买的一本.它的一份电子版初稿也可

以在CTEX网站免费下载.

另外一本值得推荐的书是LATEX2e插图指南[3].它是由CTEX的王磊在Keith Reckdahl编写的Using

ImportgraphicsinLATEX2e(Ver.2,Dec.1997)一书的基础上翻译整理的.该书目前尚未正式出版,其电子

版可以在CTEX网站免费下载.

29有没有关于LATEX宏包的详细说明

TEX系统安装时候带的LATEX宏包,都可以在TEX的安装目录下的

texmf/doc/tex/latex

"录下找到帮助文件和例子(Windows用户请将/—成\).

CTEX的在线文档提供了一份关于常见的LATEX宏包的列表和说明.

9

30我的问题没找到答案,或者有答案但是解决不了我的问题,怎么办

欢迎到CTEX BBS上提出你的问题,也欢迎指出这份文档中不正确或者不准确的地方.

参考文献

[1]CTEX翻译小组.lshort中文版3.20,2003.

[2]邓建松,彭冉冉,陈长松.LATEX2e科技排版指南,科学出版社,书号:7-03-009239-2/TP.1516

2001.

[3]王磊.LATEX2e插图指南,2000.

10

索引

EPS,9

WinEdt,9

Yap,9


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/6659453.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-03-26
下一篇 2023-03-26

发表评论

登录后才能评论

评论列表(0条)

保存