ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: AIEO.CN

SQL启蒙速成——启动篇(SQL Server)

[复制链接]

TA的精华主题

TA的得分主题

发表于 2009-9-28 12:41 | 显示全部楼层
没读懂30楼的意思,看起来倒是洋洋洒洒的。
26楼有两个提问

TA的精华主题

TA的得分主题

发表于 2009-9-28 12:49 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-9-28 12:57 | 显示全部楼层
原帖由 HHAAMM 于 2009-9-28 12:05 发表
问下楼主
自家的电脑上(系统是深度论坛的),我前后安装了十几次SQL Server(各种版本都试过),一次都没能成功安装,包括VS2008里自带的,这是怎么回事儿)

VB或VBA,编写些跟数据库交互的东东似乎也不难,所 ...



关于安装SQL Server的问题,在相关帖子里已经提过多次。不知你的深度论坛是什么意思?已经安装了某种论坛管理系统?该系统是采用什么数据库后台?如果也是SQL Server,那确实安装起来比较特别。如果真是这种情况,SQL数据库已经装好,如果没看到企业管理器,只要补装一下客户端即可。如果非要再装,SQL Server是允许装多实例的,取个不同的实例名即可(一般情况下,这种做法意义不大,通常的系统都是默认空实例,我们的也是,数据库还原到其它实例上无法使用)。关于SQL Server的版本,再次说明一下,在非服务器系统(如最常见的XP)上,最好装2000开发版,不必尝试企业版,也不用试2005甚至更高版本。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-9-28 13:19 | 显示全部楼层

最简单的界面——城市信息

       在那个小系统中,最简单的界面是“城市信息”,它所用到的SQL语句也最简单。双击月报的日期栏“2009-6-3”,进入“日报”界面,双击城市栏中的“上海”,进入“城市信息”界面。数据本是在SQL Server里,怎么跑到前台Excel文件里的呢?不需要写程序,右键点击第一行大标题,从弹出的菜单里选择“数据连接”,进入该界面。我们看到在E列“SQL”下,是存储过程名称:CS1,双击还可以继续进入“SQL语句”界面,不但看到了这个最简单的存储过程的语句,而且允许直接在这里修改,保存后即生效。
       我们再到Access界面的SQL Server中,找到同名的存储过程,右键菜单中选择“设计”,先看到的是图形化的设计界面,切换到SQL,一样可以看到SQL语句。稍有区别的是,在ADP中,存储过程的开头 CREATE PROCEDURE 被改成 ALTER PROCEDURE,其余都一样。这个简单的存储过程,用图形化方式几秒钟就可以完成,不另做视频了。
20.gif

TA的精华主题

TA的得分主题

发表于 2009-9-28 13:26 | 显示全部楼层
原帖由 HHAAMM 于 2009-9-28 12:09 发表
补充一句,用ado+datagrid控件,甚至不用写代码就可以操作数据库了


只要连接源区域就可以了,我做过,在VB里面做的。

TA的精华主题

TA的得分主题

发表于 2009-9-28 13:32 | 显示全部楼层
原帖由 AIEO.CN 于 2009-9-28 12:57 发表



关于安装SQL Server的问题,在相关帖子里已经提过多次。不知你的深度论坛是什么意思?已经安装了某种论坛管理系统?该系统是采用什么数据库后台?如果也是SQL Server,那确实安装起来比较特别。如果真是这种情 ...


深度论坛曾经是一个专门优化操作系统的论坛,类似“番茄花园”论坛。他们把win2000,xp,2003等系统进行优化精简组合,发布了多个系统版本。说白了就是对操作系统进行破解+精简的论坛(高级盗版)。“番茄花园”出事后,深度已经不再参与系统的优化改造。话扯远了。刚下完的SQL2000,开始安装。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-9-28 13:40 | 显示全部楼层
原帖由 dsp5000 于 2009-9-28 13:32 发表


深度论坛曾经是一个专门优化操作系统的论坛,类似“番茄花园”论坛。他们把win2000,xp,2003等系统进行优化精简组合,发布了多个系统版本。说白了就是对操作系统进行破解+精简的论坛(高级盗版)。“番茄花园” ...



哈哈,有趣,这回你给我上了一课。这世界之大,不知道的东西太多了!我喜欢把时间精力花在更有用的事情上,对这些就参与的少了。虎版的系统若是那么妖,咱实在帮不上什么忙了 。看来只能去请“深度高人”出手了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-9-28 14:20 | 显示全部楼层

从城市到线路——双表查询

       接下去讲一个稍微复杂一点的功能与相关SQL语句。从“城市信息”返回日报,双击线路栏,进入“线路信息”界面。再通过右键菜单进入其“数据连接”界面,我们看到这次SQL对应的是存储过程“XL2”。XL2的语句稍微复杂一点点,当然你不必敲键盘来自己写,让Access来帮忙吧。简单拖放两下,存储过程就做好了,取名“XL21”保存,如果有兴趣的话,把“数据连接”界面的“XL2”改为“XL21”,换行保存返回,刷新数据,结果不变。
21.gif

TA的精华主题

TA的得分主题

发表于 2009-9-28 14:21 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
对于想安装SQL2000与SQL2005的朋友们来说。如果你的系统是XP的话。那么SQL2000的开发版与个人版都是可以选择的。虽然网上有人修改注册表与其他地方能够成功安装SQL2000的企业版。
但是劝大家如果不熟悉的话还是不要在XP下用SQL2000企业版。因为有可能出现一些未知的BUG。
还有XP的系统最好用原版的。不要用精简的XP系统。因为精简的系统可能会把SQL一些必要的支持文件给精简了。所以建议用原版的XP。
原版的ghost也是可以的。我的本本是ghost的系统。但是一定要看它系统说明未做任何精简。只是打了补丁的话。这样的话在装SQL2000个人版与开发版一般是可以的。SQL2005的开发版也是可以的。
当然了在装SQL2000的时候可能出现有二种基本的错误。这二个错误百度或者谷歌一下就知道如何解决了。具体错误我不太记得了。一个错误大概意思是说文件挂起错误..这个错误修改一下注册表就可以了(百度或者谷歌一下)..还有一个错误不太记得了。如果大家在安装中遇到的话可以马上搜索一下就知道如何解决了。

我现在使用的就是XP与SQL2000个人版。  还有注意安装了SQL2000后一定要下载一个SP4的补丁安装上去。(不知道如何安装的也可以谷歌或者百度一下)

TA的精华主题

TA的得分主题

发表于 2009-9-28 14:27 | 显示全部楼层

部署好了,这个可以用的(凑热闹)

Sub Add_Results_Of_ADO_Recordset()
     'This was set up using Microsoft  ActiveX Data Components version 2.8
     
    Dim cnt As ADODB.Connection
    Dim rst As ADODB.Recordset
    Dim stSQL As String
    Dim wbBook As Workbook
    Dim wsSheet As Worksheet
    Dim rnStart As Range
     
     
    Const stADO As String = "Provider=SQLOLEDB.1;Integrated Security=SSPI;" & _
    "Persist Security Info=False;" & _
    "Initial Catalog=DSCDemo0831;" & _
    "Data Source=."
     'where Adventureworks is SQL Database & . is Localhost SQL Server
        
    Set wbBook = ActiveWorkbook
    Set wsSheet = wbBook.Worksheets(1)
     
    With wsSheet
        Set rnStart = .Range("B2")
    End With
     
    stSQL = "SELECT Code,CnName FROM Employee"
     
    Set cnt = New ADODB.Connection
     
    With cnt
        .CursorLocation = adUseClient
        .Open stADO
        .CommandTimeout = 0
        Set rst = .Execute(stSQL)
    End With
     
     'Here we add the Recordset to the sheet from A1
    rnStart.CopyFromRecordset rst
     
     'Cleaning up.
    rst.Close
    cnt.Close
    Set rst = Nothing
    Set cnt = Nothing
     
End Sub
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-23 06:08 , Processed in 0.046229 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表