Известный Болтун
Зарегистрирован:
30 September 2002
Сообщения: 506
Примеры кода: 5
|
RE[11]: DropDown List+CheckBox: как передать выбранные(отмеченные) items в таблицу на MS SQL Server 2000 |
04 April 2005 17:40 |
|
|
|
|
Попробуй вот так:
Dim InsertCmd As String
InsertCmd = "insert into CV(NAME,PREFJOB,BIRTH,AGE,ADRESS,STATUS," _
& "PHONE,CELL,STYEAR1,STYEAR2,STYEAR3,STYEAR4,STYEAR5,FINYEAR1," _
& "FINYEAR2,FINYEAR3,FINYEAR4,FINYEAR5,STNAME1,STNAME2,STNAME3,STNAME4," _
& "STNAME5,ADDEDUCATION,COMPNAME1,COMPNAME2,COMPNAME3,COMPNAME4,COMPNAME5," _
& "COMPNAME6,PROFILE1,PROFILE2,PROFILE3,PROFILE4,PROFILE5,PROFILE6,JTIME1," _
& "JTIME2,JTIME3,JTIME4,JTIME5,JTIME6,JOB1,JOB2,JOB3,JOB4,JOB5,JOB6," _
& "ADDEXPERIENCE,HEBREW,ENGLISH,RUSSIAN,OTHER,OTHERLANG1,OTHERLANG2," _
& "OTHERLANG3,OTHERLANG4,DRIVELICENCEYES,DRIVELICENSENO,AUTOOWNERYES," _
& "AUTOOWNERNO,ADDINFO,RECOMENDATION)" _
& "values (@Name,@PrefJob,@Birth,@Age,@Adress,@Status," _
& "@Phone,@Cell,@StYear1,@StYear2,@StYear3,@StYear4,@StYear5,@FinYear1," _
& "@FinYear2,@FinYear3,@FinYear4,@FinYear5,@StName1,@StName2,@StName3,@StName4," _
& "@StName5,@AddEducation,@CompName1,@CompName2,@CompName3,@CompName4,@CompName5," _
& "@CompName6,@Profile1,@Profile2,@Profile3,@Profile4,@Profile5,@Profile6,JTime1," _
& "@JTime2,@JTime3,@JTime4,@JTime5,@JTime6,@Job1,@Job2,@Job3,@Job4,@Job5,@Job6," _
& "@AddExperience,@Hebrew,@English,@Russian,@Other,@OtherLang1,@OtherLang2," _
& "@Otherlang3,@Otherlang4,@DriveLicenceYes,@DriveLicenceNo,@AutoOwnerYes," _
& "@AutoOwnerNo,@AddInfo,@Recomendation)"
|
|