【HSP3】ConvertStringToVariant | Codetter（こーどったー）

#module
#deffunc ConvertStringToVariant var out, str in 
	dimtype out, vartype("variant")
	out("vt") = 8/*VT_BSTR*/
	out("val") = in
	bstr = v("bstrptr")
return bstr
#global