文本转html代码（txt文件怎么转换为html文件）

本文目录

• txt文件怎么转换为html文件
• rtf文本格式如何转换html格式(c#代码实现)
• 如何将已排版好的word文件转化成Html代码，保留所有格式
• 怎么把文本转为网页代码

txt文件怎么转换为html文件

以下是个例子，你可以用写字板把你的文本内容替换“这里放文本内容”，并存为扩展名为.htm或.html的文件即可（完全不带格式的）：
《html》
《head》
《meta name="GENERATOR" content="Microsoft FrontPage 5.0"》
《meta name="ProgId" content="FrontPage.Editor.Document"》
***隐藏网址***
《title》这里放标题《/title》
《/head》
《body》
《p》这里放文本内容《/p》
《/body》
《/html》

还有别的方法，如word文档另存为html、在网页设计工具如frontpage里面打开新网页然后把文本拷入保存，等等。

rtf文本格式如何转换html格式(c#代码实现)

将RTF格式的文件转成HTML并在网页中显示的代码 它是这样工作的，将一个RTF文件上传，然后转成HTML显示出来，代码有点复杂,teaman还要好好研究,好象中文版有点问题。 《html》 《body》 《? if(!($userfile)) { ?》 《form enctype="multipart/form-data" action="《?print($PHP_SELF);?》" method=post》 《input type=hidden name="max_file_size" value=2000》 Send this file: 《input name=userfile type=file》 《input type=submit value=Upload》 《/form》 《/body》 《/html》 《? exit; } function ProcessTags($tags, $line) { $html = ""; global $color; global $size; global $bullets; // Remove spaces. $tags = trim($tags); // Found the beginning of the bulleted l // ist. if(ereg("\\\pnindent", $tags)) { $html .= "《ul》《li》"; $bullets += $line; $tags = ereg_replace("\\\par", "", $tags); $tags = ereg_replace("\\\(tab)", "", $tags); } if($line - $bullets == 0) { $tags = ereg_replace("\\\par", "", $tags); } elseif($line - $bullets == 1) { if(ereg("\\\pntext", $tags)) { $html .= "《li》"; $tags = ereg_replace("\\\par", "", $tags); $tags = ereg_replace("\\\(tab)", "", $tags); $bullets++; } else { $html .= "《/ul》"; $bullets = 0; } } // Convert Bold. if(ereg("\\\b0", $tags)){ $html .= "《/b》"; } elseif(ereg("\\\b", $tags)) { $html .= "《b》"; } // Convert Italic. if(ereg("\\\i0", $tags)){ $html .= "《/i》"; } elseif(ereg("\\\i", $tags)) { $html .= "《i》"; } // Convert Underline. if(ereg("\\\ulnone", $tags)){ $html .= "《/u》"; } elseif(ereg("\\\ul", $tags)){ $html .= "《u》"; } // Convert Alignments. if(ereg("\\\pard\\\qc", $tags)) { $html .= "《div align=center》"; } elseif(ereg("\\\pard\\\qr", $tags)) { $html .= "《div align=right》"; } elseif(ereg("\\\pard", $tags)){ $html .= "《div align=left》"; } // Remove \pard from the tags so it does // n’t get confused with \par. $tags = ereg_replace("\\\pard", "", $tags); // Convert line breaks. if(ereg("\\\par", $tags)){ $html .= "《br》"; } // Use the color table to capture the fo // nt color changes. if(ereg("\\\cf\n"); } ?》 《/body》 《/html》
不行的话试试这个
{
//创建一个word的实例
Word.Application newApp = new Word.Application();
// 指定源文件和目标文件
object Source="c:\\abc\\Source.doc";
object Target="c:\\abc\\Target.rtf";
object Unknown =Type.Missing;
// 打开要转换的Word文件
newApp.Documents.Open(ref Source,ref Unknown,
ref Unknown,ref Unknown,ref Unknown,
ref Unknown,ref Unknown,ref Unknown,
ref Unknown,ref Unknown,ref Unknown,
ref Unknown );
// 指定文档的类型
object format = Word.WdSaveFormat.wdFormatRTF;
//改变文档类型
newApp.ActiveDocument.SaveAs(ref Target,ref format,
ref Unknown,ref Unknown,ref Unknown,
ref Unknown,ref Unknown,ref Unknown,
ref Unknown,ref Unknown,ref Unknown);
//关闭word实例
newApp.Quit(ref Unknown,ref Unknown,ref Unknown);
}
}
}
或是这种方法
在richtohtml函数中增加下面的代码就行了:
Dim strLastFontsize As Long
If strLastFontsize 《》 rtbRichTextBox.SelFontSize Then
strLastFontsize = rtbRichTextBox.SelFontSize
strHTML$ = strHTML$ + "《font-size=""" & strLastFontsize & """》"
End If

如何将已排版好的word文件转化成Html代码，保留所有格式

在word界面，点击“另存为”，在格式中选择“网页文件html”，然后保存，在桌面上就会有转换过的html文件了。

怎么把文本转为网页代码

’BY Coo_boi
If WScript.Arguments.Count=0 Then WScript.Quit
Dim fso,txt,htm
txt=WScript.Arguments(0)
Set fso=CreateObject("Scripting.FileSystemObject")
Set htm=fso.CreateTextFile(txt&".htm",True)
title=fso.GetFile(txt).Name
title=Left(title,Len(title)-4)
MsgBox title
htm.WriteLine "《html》"
htm.WriteLine "《head》"
htm.WriteLine "《title》"&title&"《/title》"
htm.WriteLine "《/head》"
htm.WriteLine "《body》"
htm.WriteLine "《h1 align=center》"&title&"《/h1》"
htm.WriteLine "《hr color=red》"
For Each line In Split(fso.OpenTextFile(txt).ReadAll ,vbCrLf)
htm.WriteLine line&"《br》"
Next
htm.WriteLine "《/body》"
htm.WriteLine "《/html》"
htm.Close
WScript.Echo "为你转换html成功"
-------------------------------------------------
将分割线以上代码复制到记事本，保存为do.vbs
以后你将任何文本拖到do.vbs即可转换为网页。方便快捷!
htm.WriteLine "《hr color=red》" 这一行可以删除，删除后就没有红色的横线条了
文本文件里面可以是代码。
要是单纯转换一个文本为网页，那就尝试以下方式：
《script》
***隐藏网址***
《/script》
同样也是复制到记事本，另存为“xxx.html”即可。网页地址你可以改变。
以上2种方式，应该可以满足你的要求