<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<title>文件上传</title>

  <form action="receivefile.php" method="post" enctype="multipart/form-data">

  <input type="file" name="filename">

  <input type="submit">

  </form>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<title>接收上传文件</title>

<?php

  $conn = @new COM("ADODB.Connection");

  $connstr = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" . realpath("person.mdb");

  $conn->Open($connstr);

  $uploaddir = 'uploads/';

  if(!is_dir($uploaddir)){

    mkdir($uploaddir);

  }

  $filename =$_FILES['filename']['name'];

  $filename =substr($_FILES['filename']["name"],0,strpos($_FILES['filename']["name"],"."));

  echo $filename;

  echo "<br>";

  $uploadfile = $uploaddir.$filename.substr($_FILES['filename']["name"],strpos($_FILES['filename']["name"],"."));

  //目录名.文件名.后缀名

  echo $uploadfile;

  echo "<br>";

  $temploadfile = $_FILES['filename']['tmp_name'];

  echo $temploadfile;

  echo "<br>";

  move_uploaded_file($temploadfile , $uploadfile); //移动文件

  $path = $_SERVER['SCRIPT_FILENAME'];

  $filepath = $_SERVER["PHP_SELF"];

  $path = substr($path,0,strpos($path,$filepath));

  echo $path;

  echo "<br>";

  echo $filepath;

  $htmlpath = $path."/shiyan4/".$uploadfile;

  echo "<br>";

  echo $htmlpath;

  word2html($htmlpath);

  //$query =@mysql_query( "Insert into $username(fname,file)values('$filename','$uploadfile')")or die("error");

?>

<?php

 //http://tieba.baidu.com/f?kz=13975389

 function word2html($wfilepath)

 {

   $word=new COM("Word.Application") or die("无法打开 MS Word");

   $word->visible = 1 ;

   $word->Documents->Open($wfilepath)or die("无法打开这个文件");

   $htmlpath=substr($wfilepath,0,-4);

   $word->ActiveDocument->SaveAs($htmlpath,8);

   $word->quit(0);

 }

 print( "Word转html完成!" );

?>