仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 1319|回复: 8
打印 上一主题 下一主题

[学习教程] MSSQL网页编程之静态的毗连到数据库的办法

[复制链接]
跳转到指定楼层
楼主
发表于 2015-1-16 22:27:25 | 显示全部楼层 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
由MySQL用来存储数据的文件格式以已经被广泛地测试过,但是总是有外部情况可以导致数据库表被破坏:静态|数据|数据库
静态的毗连到数据库的办法:
 这里我们创立一个后缀为Ini的文件system.ini,在system.Ini文件中写进以下代码:

   [DBMS_PROFILES]
   CURRENT=ODBC
   PROFILES=
   [Profile]
   DBMS=
   Database=
   UserId=
   DatabasePassword=
   LogPassword=
   ServerName=
   LogId=
   Lock=
   DbParm=ConnectString=DSN=ora8;UID=;PWD= //ora8指数据库服务器名
   Prompt=0
   AutoCommit=0

  如许在使用程序的open事务中写进下代码:
  stringls_inifile

  ls_inifile="system.ini"

//Profilesystem
SQLCA.DBMS=ProfileString(ls_inifile,"Database","DBMS","")
SQLCA.database=ProfileString(ls_inifile,"Database","database","")
SQLCA.userid=ProfileString(ls_inifile,"Database","userid","")
SQLCA.dbpass=ProfileString(ls_inifile,"Database","dbpass","")
SQLCA.LogId=ProfileString(ls_inifile,"Database","LogId","")
SQLCA.LogPass=ProfileString(ls_inifile,"Database","LogPassWord","")
SQLCA.ServerName=ProfileString(ls_inifile,"Database","ServerName","")
SQLCA.DBParm=ProfileString(ls_inifile,"Database","DBParm","")

Connectusingsqlca;
open(w_frame)
Ifsqlca.sqlcode0then
Messagebox("不克不及毗连到数据库",Sqlca.sqlerrtext)
return
endif


*****代码测试经由过程Pb8.0MySQL这个名字是怎么来的已经不清楚了。基本指南和大量的库和工具带有前缀“my”已经有10年以上,而且不管怎样,MySQLAB创始人之一的的女儿也叫My。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-5-18 04:08

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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