大家好，帮帮忙，我想给自己家种植的红薯什么时候种植起个有意义的名字！
点击联系发帖人
时间：2017-03-11 00:21
B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
发布时间： 8:22:28
编辑：www.fx114.net 我要评论
本篇文章主要介绍了"B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
]"，主要涉及到B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
]方面的内容，对于B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
]感兴趣的同学可以参考一下。
希望给你原代码啊，非常感谢了啊，我的油箱是
Sub&Initialize
On&Error&Goto&ERRHANDLE
Dim&curdb&As&NotesDatabase
Set&session&=&New&Notessession
Set&curdb&=&session.currentdatabase
&&&&&&&&&viewname$="Excel"
Dim&doc&As&Notesdocument
Print&|Content-Type:application/vnd.ms-excel|
Call&viewToHTML(curdb,viewname$)
&&&&ERRHANDLE:
Msgbox&Error()
Msgbox&"erl:"+Cstr(Erl())
Sub&viewToHTML&(db&As¬esDatabase,&viewname&As&String)
On&Error&Goto&errorHandler
Dim&s&As&New¬esSession
Dim&view&As¬esView
Dim&doc&As¬esDocument
Dim&fileNum&As&Integer
Dim&counter&As&Integer
Set&view&=&db.GetView&(viewname)
Set&doc&=&view.GetFirstDocument
Print&|&Table&|
Forall&c&In&view.Columns
If&(Not&c.isHidden)&Then
Print&|&th&|&&&c.Title&&&|&/th&|
End&Forall
While&Not&(doc&Is&Nothing)
counter%&=&0
Print&|&tr&|
Forall&values&In&doc.ColumnValues
If&(Not&view.Columns&(counter%).IsHidden)&Then
Print&|&td&valign="top"&|
If&Isscalar&(values)&Then
Print&values
Forall&v&In&values
Print&v&&&|&br&|
End&Forall
Print&|&/td&|
counter%&=&counter%&+&1
End&Forall
Print&|&/tr&|
Set&doc&=&view.GetNextDocument&(doc)
Print&|&/table&|
errorHandler:
|[|&&&s.currentAgent.name&&&_
|-|&&&myFunction&&&_
|]|&&&|&Error:&|&&&Error$&&&|&(|&&&Cstr&(Err)&&&|)&at&line&|&&&Cstr&(Erl)
Error&Err,&Error$
1.输出文档较多时需要更改代理超时设置.
2.显示列无法打印老兄啊，这个方法好象不行啊。
你测试过了吗
是不是只要把
viewname$="Excel"
中的EXCEL改成我自己的视图就可以拉？？？？？？？？？？？？？？？？？？？？？？
急啊你留下EMAIL，我发个例子给你。Sub&Click(Source&As&Button)
&Dim&s&As&New¬essession
&Dim&db&As¬esdatabase
&Dim&view&As¬esview
&Dim&dc&As¬esdocumentcollection
&Dim&doc&As¬esdocument
&Dim&vcols&As&Variant
&Dim&uvcols&As&Integer
&Set&db&=&s.currentdatabase
&Set&dc&=&db.unprocesseddocuments
&Set&view&=&db.getview("当前视图的名称")
&uvcols=Ubound(view.columns)
&Dim&xlapp&As&Variant
&Dim&xlsheet&As&Variant
&'创建一个Excel对象
&Set&xlapp=createobject("Excel.application")
&xlapp.statusbar&=&"正在创建工作表，请稍等......"
&xlapp.visible&=&True
&'添加工作薄
&xlapp.workbooks.add
&xlapp.referencestyle&=&2
&Set&xlsheet&=&xlapp.workbooks(1).worksheets(1)
&'为工作表命名
&xlsheet.name&=&"notes&export"
&Dim&rows&As&Integer
&Dim&cols&As&Integer
&Dim&maxcols&As&Integer
&For&x=0&To&Ubound(view.columns)
&&xlapp.statusbar&=&"正在创建单元格，请稍等......"
&&If&view.columns(x).IsHidden&=&False&Then
&&&If&view.columns(x).title&&""&Then
&&&&xlsheet.cells(rows,cols).value&=&view.columns(x).title
&&&&cols&=&cols&+&1
&maxcols=cols-1
&Set&doc=dc.getfirstdocument
&Dim&fieldname&As&String
&Dim&fitem&As¬esitem
&Do&While&Not(doc&Is&Nothing)
&&For&x=0&To&Ubound(view.columns)
&&&xlapp.statusbar="正在从Notes中引入数据，请稍等......"
&&&If&view.columns(x).IsHidden=False&Then
&&&&If&view.columns(x).title&&""&Then
&&&&&fieldname&=&view.columns(x).itemname
&&&&&Set&fitem&=&doc.getfirstitem(fieldname)
&&&&&xlsheet.cells(rows,&cols).value&=&fitem.text
&&&&&cols&=&cols&+1
&&&&End&If
&&rows&=&rows+1
&&cols&=&1
&&Set&doc=&dc.getnextdocument(doc)
&xlApp.Row&s("1:1").select
&xlApp.Selection.Font.Bold=True
&xlApp.Range(xls&heet.cells(1,1),xlsheet.Cells(rows,maxcols)).Select
&xlApp.Selection.Fon&t.Name="Arial"
&xlApp.Selection.Font.Size=9
&xlApp.Selcetion.Col&umns.Autofit
&With&xlapp.worksheets(1)
&&.pagesetup.orientation&=&2
&&.pagesetup.centerheader&=&"report&_&confidential"
&&.pagesetup.rightfooter&=&"page&&P"&&&Chr$(13)&&&"Date:&D"
&&.pagesetup.CenterFooter&=&""
&xlapp.referencestyle&=&1
&xlapp.range("A1").Select
&xlapp.statusbar&=&"数据导入完成。"
End&Subb/s啊。
用ls显然不行了。需要借助于控件吧。楼上的程序好象是C/S的啊，能不能给我一个B/S的
C/S下好用，B/S下就没有反映，你能给我发个例子吗？？
谢谢，非常感谢
我的邮箱是
楼上的程序好象是C/S的啊，能不能给我一个B/S的
C/S下好用，B/S下就没有反映，你能给我发个例子吗？？
谢谢，非常感谢
我的邮箱是
B/S下比C/S下还要简单，你写个代理，在Initialize里写代码如下：
假设你有视图MyView，里面有字段MyField1-5：
Dim&s&As&New&NotesSession
Dim&db&As&NotesDatabase
Dim&view&As¬esview
Dim&doc&As¬esdocument
Set&db=s.CurrentDatabase
Set&view=db.getview("MyView")
Set&doc=view.getfirstdocument()
Print&{Content-Type:application/vnd.ms-excel}'这是关键！！！
Print&|&table&align=center&bordercolordark=white&bordercolorlight=#76cdd6&cellspacing=0&border=1&|
Print&|&tr&height=22&|
Print&|&font&size=2&color=red&&B&|
Print&|&td&字段1&/td&|
Print&|&td&字段2&/td&|
Print&|&td&字段3&/td&|
Print&|&td&字段4&/td&|
Print&|&td&字段5&/td&|
Print&|&/B&&/font&|
Print&|&/tr&|
While&Not(doc&Is&Nothing)
Print&|&tr&height=22&|
Print&|&font&size=2&color=black&|
Print&|&td&|+Cstr(MyField1(0))+|&/td&|
Print&|&td&|+Cstr(MyField2(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField3(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField4(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField5(0))+|&/td&|
Print&|&/font&|
Print&|&/tr&|
Set&doc=view.getnextdocument(doc)
Print&|&/table&|
还有，建议你多去www.notes.net，那里很难找到回答不了的问题，不过是英文的。补充一句，代理最好以.xls结尾，这样可以欺骗IE以为真的是Excel文件。
你把代码写好，在浏览器里用openagent命令（例如http://server/OA/test.nsf/ExportToExcel.xls?OpenAgent）打开，它会在IE里打开Excel的OLE服务器，里面已经填写好了你print的内容，你觉得效果如何？
其实你可以用这种方法，使用HTML作出非常漂亮的报表的！just&try&it!mark楼上真厉害。。上面程序测试成功，感谢楼上的各位大虾，我又学了点东东，太感谢你们了。：）兄弟们，我的怎么出现错误呢，
Print&|&td&字段1&/td&|
Print&|&td&字段2&/td&|
Print&|&td&字段3&/td&|
Print&|&td&字段4&/td&|
Print&|&td&字段5&/td&|
字段1到5里添的是视图下列对应“域”的名字或者“简单功能”的名字吗？？？
我的上面怎么老是出现红的颜色啊，你们发个例子个我如何呢？？
谢谢啊，非常感谢
我的QQ希望和大家多多交流楼主：
&&我一开始测试的时候也是红色，那是因为你在拷贝的时候网页大概产生了空格，我记得是这样：&&
&&&我把Print&|&td&|+Cstr(MyField3(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField4(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField5(0))+|&/td&|
这个里面的Cstr(MyField3(0))，都改来成变量就好了。。还有空格什么的，你自己仔细看看。Dim&s&As&New&NotesSession
Dim&db&As&NotesDatabase
Dim&view&As¬esview
Dim&doc&As¬esdocument
Set&db=s.CurrentDatabase
Set&view=db.getview("fawen")
Set&doc=view.getfirstdocument()
Print&{Content-Type:application/vnd.ms-excel}'这是关键！！！
Print&|&table&align=center&bordercolordark=white&bordercolorlight=#76cdd6&cellspacing=0&border=1&|
Print&|&tr&height=22&|
Print&|&font&size=2&color=red&&B&|
Print&|&td&当前步骤&/td&|
Print&|&td&发文标题&/td&|
Print&|&td&办理人&/td&|
Print&|&/B&&/font&|
Print&|&/tr&|
While&Not(doc&Is&Nothing)
Print&|&tr&height=22&|
Print&|&font&size=2&color=black&|
Print&|&td&|+doc.CurStep(0)+|&/td&|
Print&|&td&|+doc.subject(0)+|&/td&|
Print&|&td&|+c+|&/td&|
Print&|&/font&|
Print&|&/tr&|
Set&doc=view.getnextdocument(doc)
Print&|&/table&|请教各位大虾：在B/S方式下怎么把视图的内容转化为一张表格
我现在是在一个页面上嵌入了视图，得把他改成表格的方式显示视图转表格，第一，将视图物各列用公式，比如"&TR&","&TD&","&/TD&""&/TR&"表示，第二，将视图属性的以HTML方式显示打上勾，第三将视图嵌入表单中，在视图的前面写&Table&，视图的最后写&/Table&就可以了．To&All:
&不好意思，我贴例子的时候，忘了把字段变量从字符串里分开了，呵呵。反正现在能行了吧？
关心这个问题的朋友们，请浏览：
http://www.codestore.org/store.nsf/unid/EPSD-559R3S?OpenDocument
这里有关于此话题的很多讨论。。。To&(路在何方):
我都被搞晕啦。。。：）
Print&|&td&字段1&/td&|
就是直接往浏览器发布一个字符串啊，显示标题为“字段1”。不会出错吧。。。非常感谢大家，问题大概的已经全部解决，非常感谢各位
一、不得利用本站危害国家安全、泄露国家秘密，不得侵犯国家社会集体的和公民的合法权益，不得利用本站制作、复制和传播不法有害信息！
二、互相尊重，对自己的言论和行为负责。
本文标题：
本页链接：}
发布时间： 8:22:28
编辑：www.fx114.net 我要评论
本篇文章主要介绍了"B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
]"，主要涉及到B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
]方面的内容，对于B/S模式，如何将视图中的内容，倒入到EXCEL中，谢谢！！！SOS,帮帮忙啊，搞不好就要回家种红薯了！！！
]感兴趣的同学可以参考一下。
希望给你原代码啊，非常感谢了啊，我的油箱是
Sub&Initialize
On&Error&Goto&ERRHANDLE
Dim&curdb&As&NotesDatabase
Set&session&=&New&Notessession
Set&curdb&=&session.currentdatabase
&&&&&&&&&viewname$="Excel"
Dim&doc&As&Notesdocument
Print&|Content-Type:application/vnd.ms-excel|
Call&viewToHTML(curdb,viewname$)
&&&&ERRHANDLE:
Msgbox&Error()
Msgbox&"erl:"+Cstr(Erl())
Sub&viewToHTML&(db&As¬esDatabase,&viewname&As&String)
On&Error&Goto&errorHandler
Dim&s&As&New¬esSession
Dim&view&As¬esView
Dim&doc&As¬esDocument
Dim&fileNum&As&Integer
Dim&counter&As&Integer
Set&view&=&db.GetView&(viewname)
Set&doc&=&view.GetFirstDocument
Print&|&Table&|
Forall&c&In&view.Columns
If&(Not&c.isHidden)&Then
Print&|&th&|&&&c.Title&&&|&/th&|
End&Forall
While&Not&(doc&Is&Nothing)
counter%&=&0
Print&|&tr&|
Forall&values&In&doc.ColumnValues
If&(Not&view.Columns&(counter%).IsHidden)&Then
Print&|&td&valign="top"&|
If&Isscalar&(values)&Then
Print&values
Forall&v&In&values
Print&v&&&|&br&|
End&Forall
Print&|&/td&|
counter%&=&counter%&+&1
End&Forall
Print&|&/tr&|
Set&doc&=&view.GetNextDocument&(doc)
Print&|&/table&|
errorHandler:
|[|&&&s.currentAgent.name&&&_
|-|&&&myFunction&&&_
|]|&&&|&Error:&|&&&Error$&&&|&(|&&&Cstr&(Err)&&&|)&at&line&|&&&Cstr&(Erl)
Error&Err,&Error$
1.输出文档较多时需要更改代理超时设置.
2.显示列无法打印老兄啊，这个方法好象不行啊。
你测试过了吗
是不是只要把
viewname$="Excel"
中的EXCEL改成我自己的视图就可以拉？？？？？？？？？？？？？？？？？？？？？？
急啊你留下EMAIL，我发个例子给你。Sub&Click(Source&As&Button)
&Dim&s&As&New¬essession
&Dim&db&As¬esdatabase
&Dim&view&As¬esview
&Dim&dc&As¬esdocumentcollection
&Dim&doc&As¬esdocument
&Dim&vcols&As&Variant
&Dim&uvcols&As&Integer
&Set&db&=&s.currentdatabase
&Set&dc&=&db.unprocesseddocuments
&Set&view&=&db.getview("当前视图的名称")
&uvcols=Ubound(view.columns)
&Dim&xlapp&As&Variant
&Dim&xlsheet&As&Variant
&'创建一个Excel对象
&Set&xlapp=createobject("Excel.application")
&xlapp.statusbar&=&"正在创建工作表，请稍等......"
&xlapp.visible&=&True
&'添加工作薄
&xlapp.workbooks.add
&xlapp.referencestyle&=&2
&Set&xlsheet&=&xlapp.workbooks(1).worksheets(1)
&'为工作表命名
&xlsheet.name&=&"notes&export"
&Dim&rows&As&Integer
&Dim&cols&As&Integer
&Dim&maxcols&As&Integer
&For&x=0&To&Ubound(view.columns)
&&xlapp.statusbar&=&"正在创建单元格，请稍等......"
&&If&view.columns(x).IsHidden&=&False&Then
&&&If&view.columns(x).title&&""&Then
&&&&xlsheet.cells(rows,cols).value&=&view.columns(x).title
&&&&cols&=&cols&+&1
&maxcols=cols-1
&Set&doc=dc.getfirstdocument
&Dim&fieldname&As&String
&Dim&fitem&As¬esitem
&Do&While&Not(doc&Is&Nothing)
&&For&x=0&To&Ubound(view.columns)
&&&xlapp.statusbar="正在从Notes中引入数据，请稍等......"
&&&If&view.columns(x).IsHidden=False&Then
&&&&If&view.columns(x).title&&""&Then
&&&&&fieldname&=&view.columns(x).itemname
&&&&&Set&fitem&=&doc.getfirstitem(fieldname)
&&&&&xlsheet.cells(rows,&cols).value&=&fitem.text
&&&&&cols&=&cols&+1
&&&&End&If
&&rows&=&rows+1
&&cols&=&1
&&Set&doc=&dc.getnextdocument(doc)
&xlApp.Row&s("1:1").select
&xlApp.Selection.Font.Bold=True
&xlApp.Range(xls&heet.cells(1,1),xlsheet.Cells(rows,maxcols)).Select
&xlApp.Selection.Fon&t.Name="Arial"
&xlApp.Selection.Font.Size=9
&xlApp.Selcetion.Col&umns.Autofit
&With&xlapp.worksheets(1)
&&.pagesetup.orientation&=&2
&&.pagesetup.centerheader&=&"report&_&confidential"
&&.pagesetup.rightfooter&=&"page&&P"&&&Chr$(13)&&&"Date:&D"
&&.pagesetup.CenterFooter&=&""
&xlapp.referencestyle&=&1
&xlapp.range("A1").Select
&xlapp.statusbar&=&"数据导入完成。"
End&Subb/s啊。
用ls显然不行了。需要借助于控件吧。楼上的程序好象是C/S的啊，能不能给我一个B/S的
C/S下好用，B/S下就没有反映，你能给我发个例子吗？？
谢谢，非常感谢
我的邮箱是
楼上的程序好象是C/S的啊，能不能给我一个B/S的
C/S下好用，B/S下就没有反映，你能给我发个例子吗？？
谢谢，非常感谢
我的邮箱是
B/S下比C/S下还要简单，你写个代理，在Initialize里写代码如下：
假设你有视图MyView，里面有字段MyField1-5：
Dim&s&As&New&NotesSession
Dim&db&As&NotesDatabase
Dim&view&As¬esview
Dim&doc&As¬esdocument
Set&db=s.CurrentDatabase
Set&view=db.getview("MyView")
Set&doc=view.getfirstdocument()
Print&{Content-Type:application/vnd.ms-excel}'这是关键！！！
Print&|&table&align=center&bordercolordark=white&bordercolorlight=#76cdd6&cellspacing=0&border=1&|
Print&|&tr&height=22&|
Print&|&font&size=2&color=red&&B&|
Print&|&td&字段1&/td&|
Print&|&td&字段2&/td&|
Print&|&td&字段3&/td&|
Print&|&td&字段4&/td&|
Print&|&td&字段5&/td&|
Print&|&/B&&/font&|
Print&|&/tr&|
While&Not(doc&Is&Nothing)
Print&|&tr&height=22&|
Print&|&font&size=2&color=black&|
Print&|&td&|+Cstr(MyField1(0))+|&/td&|
Print&|&td&|+Cstr(MyField2(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField3(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField4(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField5(0))+|&/td&|
Print&|&/font&|
Print&|&/tr&|
Set&doc=view.getnextdocument(doc)
Print&|&/table&|
还有，建议你多去www.notes.net，那里很难找到回答不了的问题，不过是英文的。补充一句，代理最好以.xls结尾，这样可以欺骗IE以为真的是Excel文件。
你把代码写好，在浏览器里用openagent命令（例如http://server/OA/test.nsf/ExportToExcel.xls?OpenAgent）打开，它会在IE里打开Excel的OLE服务器，里面已经填写好了你print的内容，你觉得效果如何？
其实你可以用这种方法，使用HTML作出非常漂亮的报表的！just&try&it!mark楼上真厉害。。上面程序测试成功，感谢楼上的各位大虾，我又学了点东东，太感谢你们了。：）兄弟们，我的怎么出现错误呢，
Print&|&td&字段1&/td&|
Print&|&td&字段2&/td&|
Print&|&td&字段3&/td&|
Print&|&td&字段4&/td&|
Print&|&td&字段5&/td&|
字段1到5里添的是视图下列对应“域”的名字或者“简单功能”的名字吗？？？
我的上面怎么老是出现红的颜色啊，你们发个例子个我如何呢？？
谢谢啊，非常感谢
我的QQ希望和大家多多交流楼主：
&&我一开始测试的时候也是红色，那是因为你在拷贝的时候网页大概产生了空格，我记得是这样：&&
&&&我把Print&|&td&|+Cstr(MyField3(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField4(0))+|&/td&|
&&&&&&&&&Print&|&td&|+Cstr(MyField5(0))+|&/td&|
这个里面的Cstr(MyField3(0))，都改来成变量就好了。。还有空格什么的，你自己仔细看看。Dim&s&As&New&NotesSession
Dim&db&As&NotesDatabase
Dim&view&As¬esview
Dim&doc&As¬esdocument
Set&db=s.CurrentDatabase
Set&view=db.getview("fawen")
Set&doc=view.getfirstdocument()
Print&{Content-Type:application/vnd.ms-excel}'这是关键！！！
Print&|&table&align=center&bordercolordark=white&bordercolorlight=#76cdd6&cellspacing=0&border=1&|
Print&|&tr&height=22&|
Print&|&font&size=2&color=red&&B&|
Print&|&td&当前步骤&/td&|
Print&|&td&发文标题&/td&|
Print&|&td&办理人&/td&|
Print&|&/B&&/font&|
Print&|&/tr&|
While&Not(doc&Is&Nothing)
Print&|&tr&height=22&|
Print&|&font&size=2&color=black&|
Print&|&td&|+doc.CurStep(0)+|&/td&|
Print&|&td&|+doc.subject(0)+|&/td&|
Print&|&td&|+c+|&/td&|
Print&|&/font&|
Print&|&/tr&|
Set&doc=view.getnextdocument(doc)
Print&|&/table&|请教各位大虾：在B/S方式下怎么把视图的内容转化为一张表格
我现在是在一个页面上嵌入了视图，得把他改成表格的方式显示视图转表格，第一，将视图物各列用公式，比如"&TR&","&TD&","&/TD&""&/TR&"表示，第二，将视图属性的以HTML方式显示打上勾，第三将视图嵌入表单中，在视图的前面写&Table&，视图的最后写&/Table&就可以了．To&All:
&不好意思，我贴例子的时候，忘了把字段变量从字符串里分开了，呵呵。反正现在能行了吧？
关心这个问题的朋友们，请浏览：
http://www.codestore.org/store.nsf/unid/EPSD-559R3S?OpenDocument
这里有关于此话题的很多讨论。。。To&(路在何方):
我都被搞晕啦。。。：）
Print&|&td&字段1&/td&|
就是直接往浏览器发布一个字符串啊，显示标题为“字段1”。不会出错吧。。。非常感谢大家，问题大概的已经全部解决，非常感谢各位
一、不得利用本站危害国家安全、泄露国家秘密，不得侵犯国家社会集体的和公民的合法权益，不得利用本站制作、复制和传播不法有害信息！
二、互相尊重，对自己的言论和行为负责。
本文标题：
本页链接：}
我要回帖
更多推荐
- ·如何怎么能让孩子不沉迷游戏再沉迷手机游戏呢？
- ·为什么qq摇怎么让qq骰子一直是6在群里不管用？
- ·几年前看过的小说，男主和魔物娘勇者的正经游戏不知道怎么样就可以用她的能力之后可以随便用？
- ·找一款安卓安卓单机小游戏大全免费版？
- ·暗影精灵9屏幕是2K吗10玩NBA2KONLINE不能开高清？
- ·写蓝天白云成语被污染的成语
- ·两个月宝宝大便黄水水拉沫什么原因
- ·我是非法律专业大二本科生参加自考，我想参加司法考试，我是考A还是B?
- ·加拿大探亲邀请函人没有收入证明怎么办?
- ·是in a comfortablin the environmentt 还是没有a
- ·宝宝肛门破皮，跑步腿酸还要继续跑吗用护臀膏吗
- ·为什么白内障手术后遗症开始很清楚，后来又
- ·大夫，我夜晚睡觉多梦怎么办没睡觉前，经常尿尿反复是怎么搞的呢
- ·孩子一岁大人摔到后脑勺怎么办多久能看出摔没摔到脑袋
- ·二个月大宝宝呕吐发烧怎么回事怎么回事
- ·桂林山水课文像“不断”的“画卷”，因为它不但很（），而且很（）
- ·结肠癌吻合口复发复发还能治疗吗
- ·谁知道怎么报名笑果不一般三位评委。?
- ·看图软件？？？
- ·大家好，帮帮忙，我想给自己家种植的红薯什么时候种植起个有意义的名字！
- ·宝宝出生一个月婴儿睡觉不踏实天天都侧着身子睡觉有影响吗
- ·7个半月宝宝发烧38.6度宝宝发烧吃什么消炎药药
- ·宝宝肺炎不能吃什么妈妈吃什么汤不会影响宝宝
- ·If you don't want todon t make me thinkk more, 什么意思
- ·现肝癌引起肝腹水有救吗严重，肝癌晚期，吃什么较好
- ·挂科转学英国留学挂科英国留学挂科机构
- ·有谁能把220V的LED球泡灯改成12v电瓶充电电压供电的
- ·前几天喝了点酒，今天早上起来做了点事，没吃早餐，突然心里莫名的发慌发慌什么
- ·徐州市徐州焦山科目三路线图新路线什么时候开始考试
- ·腰椎压缩性骨折手术骨折术后50天能坐起来吗
- ·双双侧肾盂无分离看男女分离，左0.9，右0.8，严重吗
- ·玖富蜡笔分期期的贷款培训，开始没跟我说是贷款，刚签完，第二天不想去了，想取消，怎么办？
- ·如何扩大自己的提高知识面要读哪些书
- ·刚出生宝宝大腿内侧破皮图片了怎么办
- ·给宝宝几个月会翻身的宝宝看什么书好
