Sound Dialer
This program dials a person's number and then when they pick up press play and it will play a wav file to them, all you have to make sure is that you have cable attached from your sound card to your modem mic input. Its that simple.
AI
AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Source Code
Upload
Function WrapIt(varString,varNumChar,boolBreak)
' Word Wraps a string varString at end of word nearest column position varNumChar
' If boolBreak is true then the wrap will take place at position varNumChar regardless
varString=Trim(varString)
varSetBR = "<br>"
result=""
varString=Replace(varString,chr(13)+chr(10),chr(10))
while varString<>""
if len(varString)<=varNumChar then
line=varString
varString=""
else
varTemp1=left(varString,varNumChar)
iCount=InStrRev(varTemp1," ")
varInPlace=InStr(varTemp1,"chr(10)")
if (iCount=0) and not boolBreak then iCount=InStr(varString," ")
if (varInPlace=0) and not boolBreak then varInPlace=InStr(varString,chr(10))
if (varInPlace<iCount) and (varInPlace>0) then
finish=j-1
start=varInPlace+1
elseif iCount=0 then
finish=varNumChar
start=varNumChar+1
else
finish=iCount
start=iCount+1
end if
line=left(varString,finish)
varString=ltrim(mid(varString,start))
end if
'if result="" then result=line else
result=result&chr(10)&line
wend
if left(result,1) = chr(10) then
result = right(result,(len(result)-1))
end if
WrapIt=Replace(result,chr(10),varSetBR)
end function
Original Comments (3)
Recovered from Wayback Machine