sql - 従来のASPでvbscriptを使用してパラメータ化されたクエリを挿入すると、型エラーが発生する

Question

編集はまだタイプの不一致エラーを受け取りますが、コメントの助けを借りてコードを更新しました-以下に示す更新されたコード

ASP と VBScript は初めてです。投稿データを SQL データベースに挿入しようとしていますが、クエリが無菌化されていることを確認したいので、パラメーター化されたクエリを使用しようとしています。クエリを実行すると、このエラーが発生します。

Microsoft VBScript runtime error '800a000d'

Type mismatch

私のコードは次のようになります

Set conn = Server.CreateObject("ADODB.Connection")
conn.Mode = 3
conn.open "Provider=SQLOLEDB;Data Source=xxx.xxx.xxx.xxx,xxxx;
database=db_example;uid=user;pwd=password;"

Dim oCmd 
set oCmd= Server.CreateObject("ADODB.Command") 

Dim sSQL 
sSQL = "INSERT INTO tbl_Application (Expenses, Name, Why) VALUES (?, ?, ?);"
oCmd.CommandText = sSQL
oCmd.ActiveConnection= conn

Dim uPar 
uPar = oCmd.CreateParameter("Expenses",200,1,255,session("Expenses")) 
oCmd.Parameters.Append(uPar)

Dim vPar 
vPar = oCmd.CreateParameter("Name",200,1,255,session("Name")) 
oCmd.Parameters.Append(vPar)

Dim wPar 
wPar = oCmd.CreateParameter("Why",200,1,255,session("Why")) 
oCmd.Parameters.Append(wPar)

Dim oRS 
oRS = oCmd.Execute()

データを varchar および char として入力しようとしました。私の問題を解決する方法があれば教えてください。また、サイトに 3 つ以上のデータを挿入するつもりです。列ごとにパラメーターを手動で作成するよりも良い方法はありますか?