Advertisement
Guest User

Untitled

a guest
Jul 9th, 2017
527
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.89 KB | None | 0 0
  1. <html>
  2. <?php
  3. /***************************************************************************
  4. * instalacao.php
  5. * -------------------
  6. * Criação : Segunda-feira, 08 de abril, 2004
  7. * Copyright : (C) 2004 Quest
  8. * E-mail : k_belmont@hotmail.com
  9. *
  10. * $Id: instalacao.php,v.1 08/04/2004 13:41:00
  11. *
  12. *
  13. ***************************************************************************/
  14.  
  15. /***************************************************************************
  16. *
  17. *
  18. *
  19. ***************************************************************************/
  20. include ("versao.inc"); ?>
  21. <head>
  22. <title>|--|<?php echo $versao; ?> - Instalação|--|</title>
  23. <LINK href="questnews.css" type="text/css" rel="stylesheet">
  24. </head>
  25.  
  26. <body>
  27. <div align="center">
  28. <center>
  29. <table border="0" cellpadding="0" cellspacing="1" width="350">
  30. <tr>
  31. <td height="70"><img src="imagens/logo.gif" width="350" height="70"></td>
  32. </tr>
  33. <tr>
  34. <td height="15">&nbsp;</td>
  35. </tr>
  36. <tr>
  37. <td width="100%"><p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="3" color="#FF0000"><b>Estatus da Instala&ccedil;&atilde;o</b></font></p></td>
  38. </tr>
  39. <tr>
  40. <td><hr color="#000000"></td>
  41. </tr>
  42. <tr>
  43. <td width="100%">
  44. <font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000">
  45. <?php
  46. require("conexao.inc");
  47.  
  48. //Conecta-se ao mysql
  49. $conexao = @mysql_connect($host, $user, $pass);
  50. if(!$conexao){
  51. echo("Impossível conexão com o mysql...<br>");
  52. exit();
  53. }
  54.  
  55. //Cria o banco de dados
  56. mysql_create_db($db_quest_news, $conexao) or die ("Impossível criar o banco de dados " . $db_super_news . '.<br><hr color="#000000"></td>
  57. </tr>
  58. </table>
  59. </center>
  60. </div>
  61. <br>
  62. <br>
  63. <br>
  64. <font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000">
  65. <center>
  66. Copyright &copy; 2004 - <a class="email" href="mailto:k_belmont@hotmail.com">Quest News - Sistema para publicação de Notícias</a> - Todos os direitos reservados - All rights reserved
  67. </center>
  68. </font></body></html>');
  69.  
  70. //Seleciona o banco de dados
  71. mysql_select_db($db_super_news, $conexao);
  72. if(! @mysql_select_db($db_super_news)){
  73. echo("Impossível conectar-se com o banco de dados: " . $db_super_news . '<br>');
  74. }
  75. ?>
  76. <ol type="I">
  77. <?php
  78. //Cria a tabela supernews e usuario no banco de dados
  79. $sql = 'CREATE TABLE questnews (
  80. ID smallint(5) unsigned NOT NULL AUTO_INCREMENT PRIMARY KEY,
  81. titulo TEXT NOT NULL,
  82. conteudo TEXT NOT NULL,
  83. data DATE NOT NULL,
  84. tempo TIME NOT NULL
  85. )';
  86. if(@mysql_query($sql)){
  87. echo("<li>Tabela supernews criada com sucesso!<br>");
  88. } else {
  89. die("<li>Erro na criação da tabela questnews: " . mysql_error() . '<br>');
  90. }
  91.  
  92. //Insere uma notícia de boas vindas
  93. $sql = 'INSERT INTO supernews (titulo, conteudo, data, tempo) VALUES ("Seja Bem-vindo(a) ao Quest News", " Quest News é um sistema de php para publicação de news diretamente no seu site. Foi criado por WK [ Spider ], dono da Quest. Agradecemos a preferência. "
  94. if(! @mysql_query($sql)){
  95. echo("<li>Não foi possível completar a instalação, devido à um erro na inserção do conteúdo na tabela " . $db_super_news . '<br>');
  96. } else {
  97. echo("<li>A instalação foi completada...apague este arquivo e diriga-se ao <a class=\"instal\" href=\"noticias.php\" target=\"_selfnoticias.php</a>.");
  98. }
  99. ?>
  100. </ol></font><hr color="#000000"></td>
  101. </tr>
  102. </table>
  103. </center>
  104. </div>
  105. <br>
  106. <br>
  107. <br>
  108. <font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000">
  109. <center>
  110. Copyright &copy; 2004 - <a class="email" href="k_belmont@hotmail.com">Quest News - Sistema para publicação de Notícias</a> - Todos os direitos reservados - All rights reserved
  111. </center>
  112. </font>
  113.  
  114. </body>
  115. <?php
  116. //Fecha a conexao com o Mysql
  117. mysql_close($conexao);
  118. ?>
  119. </html>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement