⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 checkconnectionwizard.php

📁 Typo3, 开源里边最强大的
💻 PHP
字号:
<?php/****************************************************************  Copyright notice**  (c) 2004 Robert Lemke (robert@typo3.org)*  All rights reserved**  This script is part of the TYPO3 project. The TYPO3 project is*  free software; you can redistribute it and/or modify*  it under the terms of the GNU General Public License as published by*  the Free Software Foundation; either version 2 of the License, or*  (at your option) any later version.**  The GNU General Public License can be found at*  http://www.gnu.org/copyleft/gpl.html.**  This script is distributed in the hope that it will be useful,*  but WITHOUT ANY WARRANTY; without even the implied warranty of*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the*  GNU General Public License for more details.**  This copyright notice MUST APPEAR in all copies of the script!***************************************************************//** * Check connection wizard for ADO DB databases. For usage in a popup window. * * @author	Robert Lemke <robert@typo3.org> *//** * [CLASS/FUNCTION INDEX of SCRIPT] * * * *   63: class tx_adodb_checkconnectionwizard *   65:     function main() * * TOTAL FUNCTIONS: 1 * (This index is automatically created/updated by the extension "extdeveval") * */ 	// Build TYPO3 enviroment:$BACK_PATH='../../../typo3/';define('TYPO3_MOD_PATH', 'sysext/adodb/');require ($BACK_PATH.'init.php');require ($BACK_PATH.'template.php');	// Include ADODB library:require_once(t3lib_extMgm::extPath('adodb').'adodb/adodb.inc.php');	// Include language labels:$LANG->includeLLFile('EXT:adodb/locallang_wizard.xml');/** * Script Class checking the connection to an ADODB handled database * * @author	Robert Lemke <robert@typo3.org> * @package TYPO3 * @subpackage adodb */class tx_adodb_checkconnectionwizard {	function main() {		$content = '<html><body>';		$conf = t3lib_div::_GP('P');		$conf['md5ID'];		if ($conf['table'] == 'tx_datasources_datasource') {			$dsRecord = t3lib_beFunc::getRecord($conf['table'], intval($conf['uid']));			if (is_array ($dsRecord)) {				$dsArr = t3lib_div::xml2array ($dsRecord['configuration']);				$dsConf = $dsArr['data']['sDEF']['lDEF'];				$content .= '<p>Trying to connect with Host / DSN <strong>'.htmlspecialchars($dsConf['field_host']['vDEF']).'</strong> with user <strong>'.htmlspecialchars($dsConf['field_username']['vDEF']).'</strong> ... ';				$dbConn = &ADONewConnection($dsConf['field_dbtype']['vDEF']);				$dbConn->PConnect($dsConf['field_host']['vDEF'], $dsConf['field_username']['vDEF'], $dsConf['field_password']['vDEF'], $dsConf['field_dbname']['vDEF']);				$dbConn->SetFetchMode(ADODB_FETCH_ASSOC);				$content .= $dbConn->ErrorMsg();				if ($dbConn->_connectionID) {					$content .= '</p>';					$query = 'SELECT * FROM '.$dsConf['field_table']['vDEF'];					$recordSet = &$dbConn->SelectLimit ($query, 150);					if (!$recordSet) {						$content .= '<p>Query failed ('.htmlspecialchars($query).'):<br />';						$content .= $dbConn->ErrorMsg().'</p>';					} else {						$content .= '<span style="color:green">successful!</span></p>';						$counter = 0;						$content .= '<p>Showing the first 150 entries from the result recordset:</p>';						$content .= '<table border="1">';						while (!$recordSet->EOF) {							$content .= '<tr>';							if ($counter == 0) {								foreach (array_keys($recordSet->fields) as $key) {									$content .= '<th>'.htmlspecialchars($key).'</th>';								}								$content .= '</tr><tr>';							}							foreach (array_values($recordSet->fields) as $value) {								$content .= '<td>'.htmlspecialchars($value).'&nbsp;</td>';							}							$recordSet->MoveNext();							$counter++;							$content .= '</tr>';						}						$content .= '<table>';					}				}			} else {				$content .= '<span style="color:red">failed!</span></p><p><strong>Error Message:</strong>'. $dbConn->ErrorMsg().'</p>';			}		}		$content .= '</body></html>';		echo ($content);	}}	// Make instance:$SOBE = t3lib_div::makeInstance('tx_adodb_checkconnectionwizard');$SOBE->main();?>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -