qCon.asp

转载 2005年04月27日 00:24:00


<%
'//-------get con_str ---------//
con_str=open_con_str(".","sa","sa","Nanyi")


'//------- con_str maker ---------//
function open_con_str(ConServe,ConUser,ConPassWord,ConDatabase)
 open_con_str = "Driver={SQL Server};Server=" & ConServe & ";UID=" & ConUser & ";PWD=" & ConPassWord & ";Database=" & ConDatabase & ""
end function

'//-------open connection ---------//
function oConn()

 set oConn=server.CreateObject("ADODB.connection")
 oConn.ConnectionString=con_str
 oConn.CursorLocation=3
 oConn.Open
 
end function

'//-------open RecordSet LockType 1---------//
Function oRd(sql_str)

 Set oRd = Server.CreateObject("ADODB.Recordset")
 oRd.ActiveConnection = con_str
 oRd.Source = sql_str
 oRd.CursorType = 0
 oRd.CursorLocation = 2
 oRd.LockType = 3
 oRd.Open()
 oRd_numRows = 0
 
 End Function
 
 '//-------open RecordSet LockType 3---------//
Function oRd3(sql_str)

 Set oRd3 = Server.CreateObject("ADODB.Recordset")
 oRd3.ActiveConnection = con_str
 oRd3.Source = sql_str
 oRd3.CursorType = 3
 oRd3.CursorLocation = 2
 oRd3.LockType = 3
 oRd3.Open()
 oRd3_numRows = 0
 
 End Function

'//-------close RecordSet ---------//
function cRd(rdset)

 rdset.close
 set rdset=nothing
 
end function

'//-------open Command ---------//
function oCmd(sql_str)
 set CmdConn=oConn()
 Set oCmd=Server.CreateObject("ADODB.Command")
 
 Set oCmd.ActiveConnection = CmdConn
 oCmd.commandText=sql_str
end function

'//-------open Command to Rs---------//
function oCmdRd(sql_str)
 set CmdConn=oConn()
 Set oCommand=Server.CreateObject("ADODB.Command")
 
 Set oCommand.ActiveConnection = CmdConn
 oCommand.commandText=sql_str
 Set oCmdRd=oCommand.Execute()
 set CmdConn=nothing
end function

'//-------add Command Para---------//
function addCmdPara(Pcmd,pNmae,pType,pIO,pLength,pValue)
 set CommandPara1=Pcmd.CreateParameter(pNmae,pType,pIO,pLength)
 Pcmd.Parameters.Append CommandPara1
 Pcmd(pNmae)=pValue
end function

%>

QCon 热点演讲视频及幻灯片索引

在过去 8 个多月的时间,QCon 微信公众号一共发布了 70 多个演讲视频和幻灯片,收获 28 万次阅读。 这里简单分了个类,方便读者收藏查询。 以下按照架构、大数据、运维、移动、...

无烟会议室:CMMI vs. Scrum vs. XP(QCon 2010 感受)

作者:陈勇 无烟会议室公司开发部门要建无烟会议室,三种人做法如下:CMMI公司级订立无烟会议室制度,宣贯,张贴海报。经过大家提醒执行,行政部小王不定期抽查,秩序井然。直到老板李总带着客户张总来到会议室...

QCon大会Mike Lee:如何开发靠谱的应用

转自:http://news.51cto.com/art/201204/331286.htm QCon大会Mike Lee:如何开发靠谱的应用 2012-04-23 03:55 倾...

qcon感想

又一次qcon结束了,国内的几大网站加上google, twitter都来讲了不少好东西。这个会议跟别的推销自己技术产品的会议不同,是纯技术会议,而且门票不便宜,跟boss请示了好几天,终于搞到一套三...

2016年Qcon值得关注的技术分享

http://2016.qconbeijing.com/tracks  新兴技术及应用 运维与监控专场(厂商专场) 新时代的数据存储与访问技术 知名互联网公司的管理方法...

Qcon北京2017总结:测试角度看泛智能和大数据

全部 ppt 下载地址:https://pan.baidu.com/s/1eRHgUZK#list/path=/ 本来这个文章应该在很早之前就写的,可惜一直没时间,写的时候断断续续。关键是这次 le...

Qcon上海第二天参会总结

QCon上海今天进入到第二天,内容更加精彩,哈哈!首先是有太多好的内容需要听了,因为没有上午的大场Keynote,所以场次特别多,上下午各有五个会议室同时开放,全天下来一共有四十场演讲,真的是让大家在...

Stack Overflow architecture qcon china

  • 2014年08月06日 18:24
  • 3.4MB
  • 下载

2015年QCon会议上的PPT全集12

  • 2015年10月18日 20:29
  • 10MB
  • 下载

QCon2017论坛 深度学习最新进展与实践 与会纪要

官方的介绍:http://www.bagevent.com/event/472843 深度学习真的还是依然火热..现场人员幸亏进去的早,后面都站满了人。 共四个报告。聊天机器人这是第一个报告,也是...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:qCon.asp
举报原因:
原因补充:

(最多只允许输入30个字)