<% Dim InstallDir,CD_DBtype,CD_DataPath Dim CD_SqlHostIP,CD_SqlDatabaseName,CD_SqlUsername,CD_SqlPassword InstallDir = "/" '网站目录,务必认真填写,放在根目录的话就填“/” CD_DBtype= "acc" 'acc为ACCESS数据库，sql为MSSQL数据库 CD_DataPath = InstallDir & "Data/#Dj95_Com_Data_pghifthipsznb.mdb" '主数据库名称和路径 CD_SqlHostIP = "(local)" 'SQL数据库IP CD_SqlDatabaseName = "" 'SQL数据库名 CD_SqlUsername = "" 'SQL数据库用户名 CD_SqlPassword = "" 'SQL数据库用户密码 %>