I found this script.. but maybe someone would know how to convert it to vb 3.6
#################################
#Hack: Thread Type Hack
#Hack By: Tim "eXtremeTim" Yarbrough
#Created For:
http://www.extremechatforums.com/forum/index.php
#Live Demo : ( ID: 143 password: test )
http://www.efz-tm.net/forums/newthread.php?do=newthread&f=130
#################################
#If you like this hack please click install.
#################################
#NOTES
#As with any hack please backup your files and database before installing.
#################################
####################
#Files to be edited#
####################
#root/newthread.php
#root/forumdisplay.php
#root/includes/functions_newpost.php
####################
########################
#Templates to be edited#
########################
#newthread
#threadbit
########################
################
#Queries to run#
################
ALTER TABLE `thread` ADD `threadtype` VARCHAR( 30 ) NOT NULL ;
################
#####################
#Start of file edits#
#####################
###############
#Open root/newthread.php
###############
######
#Find#
######
$newpost['posthash'] = $posthash;
###########
#Add Below#
###########
//Thread Type Hack By Tim "eXtremeTim" Yarbrough for
http://www.extremechatforums.com/forum/index.php
$newpost['threadtype'] = $_POST['threadtype'];
//End Thread Type Hack By Tim "eXtremeTim" Yarbrough for
http://www.extremechatforums.com/forum/index.php
################
#Save and close#
################
#######################
#Open root/forumdisplay.php
#######################
######
#Find#
######
deletionlog.username AS del_username, deletionlog.reason AS del_reason") . "
##############
#Replace with#
##############
deletionlog.username AS del_username, deletionlog.reason AS del_reason") . ", thread.threadtype
################
#Save and close#
################
#######################
#Open root/includes/function_newpost.php
#######################
######
#Find#
######
// ### POST NEW THREAD ###
if ($type == 'thread')
{
###########
#Add Below#
###########
$post['threadtype'] = htmlspecialchars_uni(fetch_censored_text($post['threadtype']));
######
#Find#
######
iconid, visible, attach, similar
##############
#Replace with#
##############
iconid, visible, attach, similar, threadtype
######
#Find#
######
$totalattachments, '" . addslashes($similarthreads) . "'
##############
#Replace with#
##############
$totalattachments, '" . addslashes($similarthreads) . "', '" . addslashes($post['threadtype']) . "'
################
#Save and close#
################
#########################
#Start of template edits#
#########################
################
#Open newthread#
################
######
#Find#
######
<!-- subject field -->
<table cellpadding="0" cellspacing="0" border="0" class="fieldset">
<tr>
<td class="smallfont" colspan="3">$vbphrase[title]:</td>
</tr>
<tr>
<td><input type="text" class="bginput" name="subject" value="$subject" size="40" maxlength="85" tabindex="1" /></td>
<td> </td>
<td><if condition="$posticons"><img id="display_posticon" src="$selectedicon[src]" alt="$selectedicon[alt]" /><else /> </if></td> </tr>
</table>
<!-- / subject field -->
##############
#After it add ( You should edit this list to fit your site )
##############
<!-- Thread Type field -->
<table cellpadding="0" cellspacing="0" border="0" class="fieldset">
<tr>
<td class="smallfont" colspan="3">Thread Type:</td>
</tr>
<tr>
<td><select name="threadtype" tabindex="1">
<option value=""></option>
<option value="News">News</option>
<option value="Informative">Informative</option>
<option value="Important">Important</option>
<option value="Release">Release</option>
<option value="RE-Release">RE-Release</option>
<option value="Joke">Joke</option>
<option value="Question">Question</option>
<option value="Resource">Resource</option>
<option value="Tutorial">Tutorial</option>
<option value="Image Thread">Image Thread</option>
<option value="Point Less">Point Less</option>
<option value="Other">Other (for anything else)</option>
</select></td>
<td> </td>
<td><if condition="$posticons"><img id="display_posticon" src="$selectedicon[src]" alt="$selectedicon[alt]" /><else /> </if></td> </tr>
</table>
<!-- / Thread Type field -->
###########################
#Save the template changes#
###########################
################
#open threadbit#
################
######
#Find#
######
<if condition="$show['gotonewpost']"><strong>$thread[threadtitle]</strong><else />$thread[threadtitle]</if></a>
###############
#Before it add#
###############
<if condition="$thread['threadtype']"><span class="smallfont">[$thread[threadtype]]</span></if>
###########################
#Save the template changes#
###########################
